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A User  Instructions 


Appendix  A contains  user  instructions  for  the  HAMATE  application.  It  is  divided  into  three 
sections.  Section  A.l  contains  step-by-step  instructions  for  executing  every  feature  of  the 
application.  Section  A.2  lists  data  entry  rules  and  field  attributes,  and  section  A.3  is  a visual 
manual  which  provides  a quick  alternative  to  section  A.  1 . 


A.1  Step-By-Step  Instructions 

Section  A.l  lists  instructions  for  each  of  the  options  available  in  the  HAMATE  application. 
Subheadings  consist  of  the  main  screen  (and  credit  screen)  along  with  each  of  the  five  main 
screen  choices.  Detailed  instructions  for  each  feature  are  listed  in  the  appropriate  section  along 
with  pertinent  notes  and  hints. 


Main  Application  Screen  and  Credit  Screen: 

When  the  application  is  opened,  the  first  screen  that  appears  is  the  credit  screen.  To  make  this 
screen  disappear,  simply  press  the  enter  key  or  move  the  mouse  pointer  onto  the  Continue  push- 
button and  press  the  left  mouse  button  once. 

Now  the  application  is  ready  to  be  used.  The  main  screen  of  the  application  offers  five  push- 
button choices:  Single  Query,  Report  Statistics,  Browse  Report,  Print  Report  and  Exit. 

To  access  any  of  the  features  on  the  main  screen  simply  move  the  mouse  pointer  onto  the  desired 
push-button  and  press  the  left  mouse  button  once. 

The  Single  Query  option  provides  the  mechanism  for  searching  for  a particular  individual. 

The  Report  Statistics  option  is  not  implemented  at  this  time  but  is  included  here  to  demonstrate 
functionality. 

The  Browse  Report  option  allows  access  to  Information  in  the  same  order  as  reported  by  the 
employer. 

The  Print  Report  option  provides  printing  capability  for  an  employer  report  with  less  than  5000 
employees.  To  print  a larger  report,  submit  a request  to  the  system  administrator. 

The  Exit  option  quits  the  application. 
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The  Single  Query  Option: 


After  selecting  the  Single  Query  option  from  the  main  menu,  a dialog  box  appears  titled  "Please 
Enter  Query  Information"  and  the  caret  is  positioned  in  the  first  data  entry  field.  Type  in  the 
year  (for  the  prototype  this  is  only  1991)  and  the  caret  will  automatically  jump  to  the  next  data 
entry  field. 

Once  the  year  has  been  entered,  enter  the  Employee  Identification  Number  (EIN).  The  dash 
will  automatically  be  inserted  in  the  appropriate  position  and  when  the  data  entry  field  is 
complete  the  caret  will  automatically  move  to  the  last  name  data  entry  field. 

The  last  name  and  first  name  fields  are  optional.  However,  if  one  is  entered  the  other  must  be. 
If  no  first  or  last  name  is  entered  then  a social  security  number  must  be  entered  (see  below). 
Once  a last  name  is  entered,  press  the  tab  key  to  move  to  the  first  name  data  entry  field.  Once  a 
first  name  is  entered  press  the  tab  key  to  move  to  the  social  security  number  data  entry  field. 

The  social  security  number  data  entry  field  is  also  optional.  However,  if  no  first  and  last  name 
are  entered,  then  a social  security  number  must  be  entered.  When  entering  a social  security 
number  the  dashes  will  automatically  appear  in  the  appropriate  position.  When  the  data  entry  is 
complete,  the  focus  will  move  to  the  OK  push-button. 

To  request  the  search  be  performed,  press  the  enter  key  or  move  the  mouse  pointer  onto  the  OK 
push-button  and  press  the  left  mouse  button  once.  If  invalid  data  has  been  entered,  message 
boxes  will  appear  indicating  the  problem.  To  clear  the  message  boxes,  press  the  enter  key  or 
move  the  mouse  pointer  onto  the  OK  push-button  in  the  message  box  and  press  the  left  mouse 
button  once. 

If  an  incorrect  year  is  entered  a message  box  will  appear  identifying  the  problem.  Press  the  enter 
key  or  move  the  mouse  pointer  onto  the  OK  button  and  press  the  left  mouse  button  once  to  clear 
the  message  box.  Backspace  over  the  incorrect  year  and  type  in  the  correct  year.  Press  the  enter 
key  or  position  the  mouse  pointer  onto  the  OK  push-button  and  press  the  left  mouse  button  once 
to  begin  the  search  process  again. 

If  the  EIN  does  not  exist,  a message  box  will  appear.  Clear  the  message  box  and  re-enter  the 
EIN.  Press  the  enter  key  or  position  the  mouse  pointer  onto  the  OK  push-button  and  press  the 
left  mouse  button  once  to  begin  the  search  process  again. 

If  invalid  combinations  of  the  first  name,  last  name,  and  social  security  fields  occur  then  a 
message  box  will  appear  indicating  the  problem.  Clear  the  message  box,  re-enter  legal 
parameters  and  re-try  the  search. 

After  the  search  is  complete,  the  Query  Info  and  Possible  Matches  screen  will  appear.  See  the 
next  section  for  instructions  for  maneuvering  through  this  screen. 
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Query  Info  and  Possible  Matches  Screen: 

The  Query  Info  and  Possible  Matches  Screen  provides  access  to  employer  and  employee 
information  including  browse,  detail,  and  total  data.  Employer  browse  information  is  displayed 
in  the  top  left  comer  of  the  screen  and  employee  browse  information  is  displayed  in  the  list  box 
on  the  bottom  half  of  the  screen.  Detailed  and  totals  data  are  available  from  within  the  list  box  or 
by  accessing  one  of  the  push  buttons. 

To  access  employer  detail  information,  move  the  mouse  pointer  onto  the  Employer  Detail  push- 
button and  press  the  left  mouse  button  once.  Two  choices  are  offered  on  the  employer  detail 
screen.  Press  the  Continue  button  'with  the  mouse  pointer  and  the  employer  detail  screen  'will 
disappear,  or  press  the  Print  button  with  the  mouse  pointer  and  the  employer  detail  data  vvdll  be 
sent  to  the  printer  and  a message  box  'will  appear  indicating  that  printing  is  in  progress.  Press  the 
Continue  button  'with  the  mouse  pointer  on  the  message  box  to  clear  the  message  box  and  select 
other  options  from  the  Query  Info  and  Possible  Matches  Screen  as  desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  'will  release 
this  box  and  it  'will  disappear. 

To  access  a different  employer  report  associated  'with  a multiple-report  EIN,  position  the 
mouse  pointer  onto  the  Change  icon  (the  blue  arrow)  and  press  the  left  mouse  button  once. 
Answer  the  message  prompt  by  entering  the  desired  3 -character  report  number.  Press  OK  to 
make  the  change.  (Notice  the  new  employer  report  in  the  employer  browse  information  section. 
The  employer  detail  has  also  been  updated  as  a result  of  this  operation.) 

The  employee  browse  information  displayed  in  the  list  box  is  returned  in  a ranked  order 
pertaining  to  the  query  parameters.  In  other  words,  the  names  and/or  social  security  numbers 
'will  be  listed  in  the  order  that  most  closely  matches  the  query  parameters.  The  list  box 
information  may  be  scrolled  through  using  the  up  and  do'wn  arrow  keys,  the  scroll  bars  or  the 
page  up  and  page  do'wn  keys.  To  use  the  scroll  bar,  position  the  mouse  pointer  on  the  up  or 
do'wn  arrows  in  the  scroll  bar  and  hold  do'wn  the  left  mouse  button  or  slowly  click  the  left  mouse 
button.  To  use  the  scroll  button  (the  gray  rectangle  in  the  scroll  bar),  position  the  mouse  pointer 
on  the  scroll  button  and  while  holding  do'wn  the  left  mouse  button,  drag  the  mouse  up  and  do'wn 
as  desired. 

If  the  employee  is  not  found  in  the  first  set  of  50  matches  returned  in  the  list  box,  the  next  set  of 
50  possible  matches  may  be  accessed  by  pressing  the  Additional  Matches  button  'with  the 
mouse  pointer.  The  next  set  of  fifty  matches  'svill  then  be  added  to  the  list  box.  The  highlight  bar 
'will  be  positioned  on  the  first  entry  of  the  new  set  of  fifty  to  facilitate  user  browsing. 

NOTE: Due  to  memory  constraints  and  the  fact  that  this  is  a prototype,  the  list  box  'will 

hold  approximately  700  employee  records  depending  on  the  size  of  the  record. 

Once  the  limit  has  been  reached,  no  records  'will  be  added  to  the  list  box.  If  this 
situation  occurs,  a message  box  will  appear  indicating  the  occurrence. 
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To  access  the  employee  detail  data,  move  the  highlight  bar  in  the  list  box  with  the  up  and  down 
arrow  keys  to  the  desired  selection  and  press  enter,  or  position  the  highlight  bar  with  the  mouse 
pointer  and  double-click  on  the  highlight  bar  to  bring  up  the  employee  detail  information. 

Two  choices  are  offered  on  the  employee  detail  screen.  Press  the  Continue  button  with  the 
mouse  pointer  and  the  employee  detail  screen  will  disappear,  or  press  the  Print  button  with  the 
mouse  pointer  and  the  system  will  prompt  the  user  to  enter  the  number  of  employee  details  to 
print.  Enter  the  desired  number  and  press  the  OK  button  with  the  mouse  pointer.  The  employee 
detail  data  will  be  sent  to  the  printer  and  a message  box  will  appear  indicating  that  printing  is  in 
progress.  Press  the  Continue  button  with  the  mouse  pointer  on  the  message  box  to  clear  the 
message  box  and  select  other  options  from  the  Query  Info  and  Possible  Matches  Screen  as 
desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  will  release 
this  box  and  it  will  disappear. 

To  access  final  totals  information  for  an  EIN,  press  the  Report  Totals  push-button  with  the 
mouse  pointer.  Two  choices  are  offered  on  the  Totals  screen.  Press  the  Continue  button  with  the 
mouse  pointer  and  the  Totals  screen  will  disappear,  or  press  the  Print  button  with  the  mouse 
pointer  and  the  report  totals  data  will  be  sent  to  the  printer  and  a message  box  will  appear 
indicating  that  printing  is  in  progress.  Press  the  Continue  button  with  the  mouse  pointer  on  the 
message  box  to  clear  the  message  box  and  select  other  options  from  the  Query  Info  and  Possible 
Matches  Screen  as  desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  will  release 
this  box  and  it  will  disappear. 

Another  option  on  the  Query  Info  and  Possible  Matches  screen  is  the  Potential  Blanket  push- 
button and  it  involves  identification  of  a possible  blanket.  If  a possible  blanket  adjustment  is 
identified,  press  the  Potential  Blanket  push-button  with  the  mouse  pointer.  A question  screen 
will  appear.  Answer  the  questions  per  the  on-screen  instructions  and  proceed.  Next,  a screen 
will  appear  prompting  you  to  enter  the  3 -character  report  number  of  the  EIN.  Enter  the  report 
number  and  press  the  OK  button  with  the  mouse  pointer.  The  Query  Info  and  Possible  Matches 
screen  will  disappear  and  the  Blanket  Information  screen  will  appear.  To  cancel  this  operation 
before  going  to  the  Blanket  Information  screen  press  the  Cancel  button  with  the  mouse  pointer 
and  the  screen  that  prompts  for  the  EIN  identifier  will  disappear. 

If  the  report  number  can  not  be  found,  a message  box  will  appear.  To  clear  the  message  box 
press  the  OK  button  with  the  mouse  pointer  and  re-enter  the  report  number.  Once  the  report 
number  is  entered,  press  the  OK  button  with  the  mouse  pointer  to  access  the  Blanket  Information 
Screen. 
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To  view  the  most  recently  entered  query  parameters,  position  the  mouse  pointer  onto  the  QP 
icon  and  press  the  left  mouse  button  once.  A screen  will  appear  containing  the  most  recently 
entered  query  parameters.  To  clear  the  screen  press  the  OK  button  with  the  mouse. 

To  exit  the  Query  Info  and  Possible  Matches  Screen,  press  the  Close  push-button  with  the  mouse 
pointer  and  the  Query  Information  and  Possible  Matches  Screen  will  disappear  and  the  main 
application  screen  will  reappear  allowing  for  further  selections. 

Before  the  Query  Info  and  Possible  Matches  Screen  disappears,  a question  screen  will  appear 
prompting  the  user  to  enter  information  about  the  current  query  operation  before  moving  on  to 
other  operations.  Answer  the  questions  by  following  the  on-screen  instructions. 


Blanket  Information  Screen: 

The  Blanket  Information  Screen  offers  the  same  types  of  information  as  the  Query  Info  and 
Possible  Matches  Screen  except  that  it  displays  30  records  - ten  from  the  beginning,  ten  from  the 
middle,  and  ten  from  the  end  - of  the  specified  employer  report  instead  of  possible  matches. 

To  access  the  employer  detail  data,  press  the  Employer  Detail  button  with  the  mouse  pointer  and 
the  employee  detail  screen  will  appear.  Two  choices  are  offered  on  the  employer  detail  screen. 
Press  the  Continue  button  with  the  mouse  pointer  and  the  employer  detail  screen  will  disappear, 
or  press  Print  with  the  mouse  pointer  and  the  employer  detail  data  will  be  sent  to  the  printer  and  a 
message  box  will  appear  indicating  that  printing  is  in  progress.  Press  the  Continue  button  with 
the  mouse  pointer  on  the  message  box  to  clear  the  message  box  and  select  other  options  from  the 
Blanket  Information  Screen  as  desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  will  release 
this  box  and  it  will  disappear. 

To  access  final  totals  information  for  an  EIN,  press  the  Report  Totals  push-button  with  the 
mouse  pointer  and  the  Totals  screen  will  appear.  Two  choices  are  offered  on  the  Totals  screen. 
Press  the  Continue  button  with  the  mouse  pointer  and  the  Totals  screen  will  disappear,  or  press 
the  Print  button  with  the  mouse  pointer  and  the  report  totals  data  will  be  sent  to  the  printer  and  a 
message  box  will  appear  indicating  that  printing  is  in  progress.  Press  the  Continue  button  with 
the  mouse  pointer  on  the  message  box  to  clear  the  message  box  and  select  other  options  from  the 
Blanket  Information  Screen  as  desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  will  release 
this  box  and  it  will  disappear. 

To  print  a blanket  report,  press  the  Print  Blanket  push-button  with  the  mouse  pointer.  A 
message  box  will  appear  indicating  that  printing  is  in  progress.  Press  the  Continue  button  with 
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the  mouse  pointer  on  the  message  box  to  clear  the  message  box  and  select  other  options  from  the 
Blanket  Information  Screen  as  desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  will  release 
this  box  and  it  will  disappear. 

The  list  box  containing  employee  browse  information  may  be  scrolled  through  using  the  up  and 
down  arrow  keys,  the  scroll  bars  or  the  page  up  and  page  down  keys.  To  use  the  scroll  bar, 
position  the  mouse  pointer  on  the  up  or  down  arrows  in  the  scroll  bar  and  hold  down  the  left 
mouse  button  or  slowly  click  the  left  mouse  button.  To  use  the  scroll  button  (the  gray  rectangle 
in  the  scroll  bar),  position  the  mouse  pointer  on  the  scroll  button  and  while  holding  down  the  left 
mouse  button,  drag  the  mouse  up  and  down  as  desired. 

To  access  the  employee  detail  data,  move  the  highlight  bar  in  the  list  box  with  the  up  and  down 
arrow  keys  to  the  desired  selection  and  press  enter,  or  position  the  highlight  bar  with  the  mouse 
pointer  and  double-click  on  the  highlight  bar  to  bring  up  the  employee  detail  information. 

Two  choices  are  offered  on  the  employee  detail  screen.  Press  the  Continue  button  with  the 
mouse  pointer  and  the  employee  detail  screen  will  disappear,  or  press  the  Print  button  with  the 
mouse  pointer  and  the  system  will  prompt  you  to  enter  the  number  of  employee  details  to  print. 
Enter  the  desired  number  and  press  the  OK  button  with  the  mouse  pointer.  The  employee  detail 
data  will  be  sent  to  the  printer  and  a message  box  will  appear  indicating  that  printing  is  in 
progress.  Press  the  Continue  button  with  the  mouse  pointer  on  the  message  box  to  clear  the 
message  box  and  select  other  options  from  the  Blanket  Information  Screen  as  desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  will  release 
this  box  and  it  will  disappear. 

To  exit  the  Blanket  Information  Screen,  press  the  Close  push-button  with  the  mouse  pointer  and 
the  Blanket  Information  Screen  will  disappear  and  the  main  application  screen  will  reappear 
allowing  for  further  selections. 


The  Report  Statistics  Option: 

As  stated  above,  this  option  is  included  to  demonstrate  functionality  and  is  not  implemented  at 
this  time.  However,  a query  parameter  screen  and  a place  holder  screen  are  included.  If  you 
select  the  Report  Statistics  Option,  you  will  be  prompted  to  enter  the  year,  EIN,  and 
establishment  number.  Press  the  OK  button  with  the  mouse  pointer  to  bring  up  the  Report 
Statistics  Screen  or  press  the  Cancel  button  with  the  mouse  pointer  to  return  to  the  main 
application  screen. 
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Report  Statistics  Screen: 

The  Report  Statistics  Screen  is  included  here  as  a place  holder.  This  function  is  not  implemented 
for  the  prototype.  To  clear  this  screen  and  return  to  the  main  application  screen,  press  either  the 
OK  button  or  the  Cancel  button  with  the  mouse  pointer  and  the  Report  Statistics  Screen  will 
disappear. 


The  Browse  Report  Option: 

When  the  Browse  Report  Option  is  selected  an  entry  screen  will  appear  prompting  you  to  "Please 
Enter  the  Browse  Report  Information."  The  required  data  entry  fields  for  this  screen  are:  the 
year,  the  EIN,  and  the  beginning  Microfilm  Reference  Number  (MRN).  The  Establishment 
Number  data  entry  field  is  optional. 

When  the  prompt  screen  first  appears,  the  caret  will  be  located  in  the  year  data  entry  field.  Type 
in  the  year  and  the  caret  will  automatically  move  to  the  EIN  data  entry  field. 

Next  type  in  the  EIN.  The  dash  will  automatically  appear  at  the  correct  position.  The  caret  will 
automatically  jump  to  the  Beginning  MRN  data  entry  field. 

Enter  the  Beginning  MRN  and  the  browse  report  query  information  is  complete.  To  access  the 
Browse  Report  Information  Screen,  press  the  OK  button  with  the  mouse  pointer  and  the  prompt 
screen  will  disappear  and  the  Browse  Report  Information  Screen  will  appear.  To  cancel  the 
operation,  press  the  Cancel  button  with  the  mouse  pointer  and  the  prompt  screen  will  disappear, 
and  the  main  application  screen  will  reappear. 

If  the  year  is  incorrect,  a message  box  will  appear  indicating  the  problem.  To  clear  the  message 
box  press  the  OK  button  with  the  mouse  pointer  and  re-enter  the  year.  Once  the  year  is  entered, 
press  the  OK  button  to  access  the  Browse  Report  Information  Screen. 

Similarly,  if  the  EIN  can  not  be  found,  a message  box  will  appear.  To  clear  the  message  box 
press  the  OK  button  with  the  mouse  pointer  and  re-enter  the  EIN.  Once  the  EIN  is  entered,  press 
the  OK  button  to  access  the  Browse  Report  Information  Screen. 

If  the  Beginning  MRN  does  not  exist,  a message  box  will  appear.  To  clear  the  message  box 
press  the  OK  button  with  the  mouse  pointer  and  re-enter  the  Beginning  MRN.  Once  the  EIN  is 
entered,  press  the  OK  button  to  access  the  Browse  Report  Information  Screen. 

Follow  the  instructions  in  the  next  section  for  maneuvering  through  the  Browse  Report 
Information  Screen. 
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Browse  Report  Information  Screen: 

The  Browse  Report  Information  Screen  is  organized  in  a similar  fashion  to  the  Query  Info  and 
Possible  Matches  Screen  and  the  Blanket  Information  Screen.  Employer  browse  information  is 
located  in  the  top  left  comer  and  employee  browse  information  in  located  in  the  list  box  on  the 
bottom  half  of  the  screen.  Option  push  buttons  are  located  down  the  right  side  of  the  screen. 

To  access  the  employer  detail  data,  press  the  Employer  Detail  button  with  the  mouse  pointer  and 
the  employee  detail  screen  will  appear.  Two  choices  are  offered  on  the  employer  detail  screen. 
Press  the  Continue  button  with  the  mouse  pointer  and  the  employer  detail  screen  will  disappear, 
or  press  Print  with  the  mouse  pointer  and  the  employer  detail  data  will  be  sent  to  the  printer  and  a 
message  box  will  appear  indicating  that  printing  is  in  progress.  Press  the  Continue  button  with 
the  mouse  pointer  on  the  message  box  to  clear  the  message  box  and  select  other  options  from  the 
Blanket  Information  Screen  as  desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  will  release 
this  box  and  it  will  disappear. 

To  access  final  totals  information,  press  the  Report  Totals  push-button  with  the  mouse  pointer 
and  the  Totals  screen  will  appear.  Two  choices  are  offered  on  the  Totals  screen.  Press  the 
Continue  button  with  the  mouse  pointer  and  the  Totals  screen  will  disappear,  or  press  the  Print 
button  with  the  mouse  pointer  and  the  report  totals  data  will  be  sent  to  the  printer  and  a message 
box  will  appear  indicating  that  printing  is  in  progress.  Press  the  Continue  button  with  the  mouse 
pointer  on  the  message  box  to  clear  the  message  box  and  select  other  options  from  the  Browse 
Report  Information  Screen  as  desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  will  release 
this  box  and  it  will  disappear. 

The  list  box  containing  employee  browse  information  may  be  scrolled  through  using  the  up  and 
down  arrow  keys,  the  scroll  bars  or  the  page  up  and  page  down  keys.  To  use  the  scroll  bar, 
position  the  mouse  pointer  on  the  up  or  down  arrows  in  the  scroll  bar  and  hold  down  the  left 
mouse  button  or  slowly  click  the  left  mouse  button.  To  use  the  scroll  button  (the  gray  rectangle 
in  the  scroll  bar),  position  the  mouse  pointer  on  the  scroll  button  and  while  holding  down  the  left 
mouse  button,  drag  the  mouse  up  and  down  as  desired. 

Fifty  employee  records  are  added  to  the  list  upon  initial  opening  of  the  Browse  Report 
Information  Screen.  To  add  records  to  the  list  box,  press  the  Additional  Records  push-button 
with  the  mouse  pointer  and  fifty  new  records  will  be  added  to  the  list  box.  The  highlight  bar  will 
be  positioned  on  the  first  entry  of  the  new  set  of  fifty  to  facilitate  user  browsing. 

NOTE:  Due  to  memory  constraints  and  the  fact  that  this  is  a prototype,  the  number  of 

records  that  can  be  added  to  the  list  box  is  approximately  700. 
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HINT : If  you  exceed  700  records  and  want  to  look  farther  in  the  report,  close  out  the 

current  browse,  and  begin  a new  browse.  Enter  a higher  MRN  so  that  the  starting 
point  for  the  browse  is  farther  along  in  the  report. 

To  access  the  employee  detail  data,  move  the  highlight  bar  in  the  list  box  with  the  up  and  down 
arrow  keys  to  the  desired  selection  and  press  enter,  or  position  the  highlight  bar  with  the  mouse 
pointer  and  double-click  on  the  highlight  bar  to  bring  up  the  employee  detail  information. 

Two  choices  are  offered  on  the  employee  detail  screen.  Press  the  Continue  button  with  the 
mouse  pointer  and  the  employee  detail  screen  will  disappear,  or  press  the  Print  button  with  the 
mouse  pointer  and  the  system  will  prompt  you  to  enter  the  number  of  employee  details  to  print. 
Enter  the  desired  number  and  press  the  OK  button  with  the  mouse  pointer.  The  employee  detail 
data  will  be  sent  to  the  printer  and  a message  box  will  appear  indicating  that  printing  is  in 
progress.  Press  the  Continue  button  with  the  mouse  pointer  on  the  message  box  to  clear  the 
message  box  and  select  other  options  from  the  Browse  Report  Information  Screen  as  desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  will  release 
this  box  and  it  will  disappear. 

To  exit  the  Browse  Report  Information  Screen,  press  the  Close  push-button  with  the  mouse 
pointer  and  the  Browse  Report  Information  Screen  will  disappear  and  the  main  application 
screen  will  reappear  allowing  for  further  selections. 


The  Print  Report  Option: 

Once  the  print  report  option  has  been  selected,  the  Print  Report  Information  screen  will  appear. 
Password,  year,  EIN,  and  the  three-character  report  number  are  required.  The  Establishment 
Number  is  optional. 

When  the  screen  appears,  the  caret  will  be  located  in  the  password  data  entry  field.  Type  in  the 
password  and  the  caret  will  automatically  jump  to  the  year  data  entry  field. 

Next,  type  in  the  year  and  the  caret  will  automatically  jump  to  the  EIN  data  entry  field.  Type  in 
the  EIN  and  the  caret  will  automatically  jump  to  the  report  number  field.  The  dash  in  the  EIN 
will  automatically  appear  in  the  appropriate  position. 

Type  in  the  report  number  and  then  press  the  OK  button  with  the  mouse  pointer  to  send  the 
specified  report  to  the  server  printer.  To  cancel  the  operation  before  sending  the  information  to 
the  server,  press  the  Cancel  button  with  the  mouse  pointer. 

NOTE:  Only  reports  containing  less  than  5000  records  may  be  printed.  To  print  larger 

reports,  submit  a request  to  the  system  administrator. 
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If  the  year  is  incorrect,  a message  box  will  appear  alerting  the  user.  To  clear  the  message  box 
press  the  OK  button  with  the  mouse  pointer  and  re-enter  the  year.  Once  the  year  is  entered,  press 
the  OK  button  with  the  mouse  pointer  to  send  to  the  print  information  to  the  server. 

Similarly,  if  the  EIN  can  not  be  found,  a message  box  will  appear  alerting  the  user.  To  clear  the 
message  box  press  the  OK  button  vsdth  the  mouse  pointer  and  re-enter  the  EIN.  Once  the  EIN  is 
entered,  press  the  OK  button  with  the  mouse  pointer  to  send  the  print  information  to  the  server. 

If  the  report  number  can  not  be  found,  a message  box  vdll  appear  alerting  the  user.  To  clear  the 
message  box  press  the  OK  button  with  the  mouse  pointer  and  re-enter  the  report  number.  Once 
the  report  number  is  entered,  press  the  OK  button  with  the  mouse  pointer  to  send  the  information 
to  the  server. 

Upon  successful  communication  with  the  server,  a message  box  will  appear  indicating  that 
printing  is  in  progress.  Press  the  Continue  button  with  the  mouse  pointer  on  the  message  box  to 
clear  the  message  box  and  select  other  options  from  the  main  application  screen  as  desired. 

NOTE:  If  the  Now  Printing  Message  Box  does  not  respond  that  means  the  system  is  still 

preparing  the  data  for  printing.  Once  complete,  the  system  will  release 
this  box  and  it  vsdll  disappear. 


The  Exit  Option: 

After  selecting  the  exit  option  from  the  main  application  screen,  a message  box  vsdll  appear  with 
the  message  "Are  You  Sure  You  Want  To  Exit?"  Press  the  Yes  button  with  the  mouse  pointer  to 
quit  the  application,  or  press  the  No  button  vsdth  the  mouse  pointer  to  keep  the  application  open 
and  make  the  next  desired  selection. 


A.2  Data  Entry  Rules  and  Field  Attributes 

Section  A.2  outlines  data  entry  rules  and  describes  field  attributes  for  the  items  contained  in  the 
data  entry  screens.  The  table  below  lists  the  name  of  each  data  entry  field,  the  field  type  (all 
fields  are  character-based,  type  of  field  refers  to  which  characters  are  legal  - either  alpha, 
numeric,  or  both),  maximum  allowable  length  of  the  field  in  characters  (maximum  number  of 
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characters  that  may  be  entered),  the  minimum  required  length  of  the  field  in  characters  (the 
minimum  amount  of  characters  required  for  the  field  to  be  valid),  and  whether  the  field  is 
required.  Special  notes  for  required  combinations  of  data  entry  fields  along  with  other  unique 
field-related  information  follow  the  table. 


Field 

Field 

Maximum  Minimum  Required 
Allowable  Required  or 

Name 

Type 

Length 

Length 

Optional 

Single  Query  Screen 

Year 

numeric 

4 

4 

required* 

EIN 

numeric 

10 

10 

required 

Estab.  No. 

numeric 

4 

4 

optional 

Last  Name 

alpha 

15** 

1 

optional*** 

First  Name 

alpha 

12** 

1 

optional*** 

SSN 

numeric 

11 

11 

optional*** 

Report  Statistics  Screen 

Year  numeric 

4 

4 

required 

EIN 

numeric 

10 

10 

required 

Estab.  No. 

numeric 

4 

4 

optional 

Browse  Report  Screen 

Year  numeric 

4 

4 

required 

EIN 

numeric 

10 

10 

required 

Estab.  No. 

numeric 

4 

4 

optional 

Beg.  MRN 

numeric 

11 

11 

required 

Print  Report  Screen 

Password 

alphanumeric 

5 

5 

required 

Year 

numeric 

4 

4 

required 

EIN 

numeric 

10 

10 

required 

Estab.  No. 

numeric 

4 

4 

optional 

Report  No. 

alpha 

3 

3 

required 

Miscellaneous  Screens 

Num.  Copies  numeric 

5 

1 

optional***' 

Report  No. 

numeric 

3 

3 

optional***' 

Table  A-1  Data  Entry  Fields  and  Their  Attributes 
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special  Notes 

* For  the  prototype,  the  year  field  only  accepts  the  year  1991 . Other  values 
will  cause  an  error  box  to  appear. 

**  You  may  enter  up  to  27  characters  in  both  the  first  name  and  last  name  fields. 
However,  only  12  characters  will  be  recognized  in  the  first  name  field  and 
only  1 5 characters  will  be  recognized  in  the  last  name  field.  Excess  characters 
will  be  truncated. 

***  While  the  first  name  field,  the  last  name  field,  and  the  SSN  field  are  all  listed 
as  optional,  obviously  some  or  all  must  be  entered  so  a search  may  be  initiated. 
The  required  legal  combinations  are: 

• first  name  and  last  name  and  SSN 

• first  name  and  last  name 

• SSN 

One  of  these  combinations  MUST  BE  entered  in  order  to  request  a search 
on  an  individual.  If  one  of  the  above  legal  combinations  is  not  entered  on 
the  single  query  data  entry  screen  before  initiating  a search,  error  and/or 
message  boxes  will  appear. 

****  The  number  of  copies  field  will  appear  when  a detail  print  request  is  made. 

The  field  is  listed  as  optional  because  if  nothing  is  entered  the  number  of 
copies  to  print  will  default  to  one. 

*****  When  changing  the  employer  browse  information  (choosing  the  Change  icon), 
or  when  making  a potential  blanket  selection,  a message  box  will  appear 
requesting  entry  of  the  3 -character  report  number.  If  no  report  number  is 
entered,  the  current  report  number  will  be  used  as  the  default. 


A.3  Visual  Manual 

Section  A.3  depicts  the  major  screens  incorporated  into  the  EAMATE  application  in  an 
annotated  visual  format.  This  section  is  intended  as  an  alternative  to  traditional  step-by-step 
instructions  of  the  type  found  in  section  A.l.  The  visual  manual  offers  a quick  and  easy  overview 
of  primary  operations  and  their  functions  utilized  in  the  EAMATE  application  and  provides  a 
mechanism  for  learning  to  use  the  application  in  the  shortest  time  possible. 
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B Installation  and  Configuration 


The  following  sections  describe  the  setup  and  configuration  necessary  on  the  HAMATE 
prototype.  The  information  in  this  section  should  be  supplemented  by  the  reference  manuals 
supplied  by  the  vendors  of  the  installed  products,  and  by  other  sections  of  this  document,  as 
specified  in  the  instructions. 

B.l  Client  Workstation 

Section  B.l  provides  instructions  for  software  installation  and  configuration  of  the  HAMATE 
V4.2  application  onto  the  client  workstations  that  are  part  of  the  HAMATE  Expanded  Prototype 
(EEP).  Each  486/66  workstation  will  already  contain  the  latest  versions  of  DOS,  Microsoft 
Windows,  PC-NFS,  and  will  be  connected  to  a LAN. 

Each  client  workstation  will  require  minor  configuration  changes  to  Microsoft  Windows  and  PC- 
NFS  in  addition  to  the  installation  and  configuration  of  the  application,  including  associated 
work  files,  and  a set  of  utilities  for  working  with  statistics  gathered  during  application  use.  A 3- 
1/2"  disk  marked  "EEP  HAMATE  V4.2  Install  Files"  is  included  as  part  of  this  appendix. 

Additionally,  this  section  provides  instructions  for  initializing  the  environment  for  statistics- 
gathering operations  as  well  as  descriptions  for  accessing  the  recorded  statistics. 


Getting  Started 

To  begin,  make  sure  you  are  at  the  root  directory  (the  top  level)  in  DOS. 

Next,  make  a directory  titled  EAMATE. 

Change  to  the  C:\EAMATE  directory. 

Insert  the  disk  titled  "EEP  EAMATE  V4.2  Install  Files"  into  the  3-1/2"  drive. 
Now  you  are  ready  to  begin  the  installation. 

Installation 

Copy  the  file  eaniat42.exe  from  the  disk  to  the  directory  C:\EAMATE. 

Next,  copy  the  file  mfedit.ini  from  the  disk  to  the  directory  C:\EAMATE. 
Next,  copy  the  file  init.exe  from  the  disk  to  the  directory  C:\EAMATE. 


B-1 


Next,  copy  the  file  astat.exe  from  the  disk  to  the  directory  C:\EAMATE. 

Next,  copy  the  file  whatuser.exe  from  the  disk  to  the  directory  C:\EAMATE. 

At  this  point  you  are  ready  to  copy  usemum.fil  which  contains  the  user  munber  assigned  to  the 
client.  The  user  number  is  used  by  the  server  to  determine  "who"  is  making  a request.  IT  IS 
VERY  IMPORTANT  THAT  EACH  CLIENT  WORKSTATION  HAS  A UNIQUE  USER 
NUMBER  OR  THE  APPLICATION  WILL  NOT  EXECUTE  PROPERLY.  The 
installation  disk  contains  several  copies  of  usemum.fil  and  each  copy  of  usemum.fil  contains  a 
different  user  number.  To  install  a specific  usemum.fil,  copy  usemum.fil  from  the  appropriate 
directory  located  on  the  installation  disk.  USERl  directory  contains  usemum.fil  with  user 
number  1,  USER2  directory  contains  usemum.fil  with  user  number  2,  and  so  on. 

For  example,  to  copy  usemum.fil  containing  user  number  5,  type: 

copy  #:\USER5\usernum.fil  where  # is  the  designated  drive 

NOTE:  Make  sure  you  are  in  the  C:\EAMATE  directory. 

Now  that  you  have  installed  the  application  file,  the  associated  work  files  and  the  utility  files, 
you  are  ready  to  install  one  required  system  file  (a  dynamic  link  library). 

Change  to  the  directory  C:\WINDOWS\SYSTEM. 

Next,  copy  the  file  mfedit.dll  from  the  disk  to  the  directory  C:\WINDOWS\SYSTEM. 
Installation  is  now  complete  and  you  are  ready  to  make  some  configuration  changes. 


Configuration 

The  EAMATE  V4.2  application  makes  use  of  color  as  one  of  its  features  to  distinguish  data  and 
location  within  the  application.  Some  of  the  application  settings  are  achieved  by  choosing  a 
specific  color  scheme  within  Microsoft  Windows.  To  set  the  appropriate  color  scheme,  follow 
the  steps  listed  below: 

Change  to  the  directory  C:\WINDOWS. 

Copy  color.ini  from  the  disk  to  C:\WINDOWS. 

Change  to  the  root  directory  C:\. 

Open  Microsoft  Windows  by  typing  win  at  the  DOS  prompt. 

Open  File  Manager  and  locate  the  file  control.ini. 
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open  the  file  controLini  and  delete  the  sections  title  [current],  [color  schemes],  and  [custom 
colors]. 

Save  and  exit  the  file  controLini. 

Open  the  file  color.ini  and  copy  the  contents  into  the  clipboard  and  the  close  the  file  color.ini. 

Open  the  file  controLini  and  position  the  cursor  at  the  very  beginning  then  paste  the  contents  of 
the  clipboard  into  the  file  controLini. 

Save  and  exit  the  file  controLini. 

Exit  the  File  Manager,  the  appropriate  color  scheme  is  now  set. 

Now  you  are  ready  to  configure  the  EAMATE  program  group. 

From  the  File  Menu  in  Program  Manager,  select  New. 

A dialog  box  will  appear  prompting  you  to  identify  the  current  operation  as  a program  group  or  a 
program  object. 

Choose  the  program  group  and  press  OK.  Fill  in  the  description  box  with  EAMATE,  leave  the 
group  file  box  blank,  and  press  OK  again.  The  new  program  group  titled  EAMATE  will  appear. 

From  the  File  Menu  in  Program  Manager,  select  New. 

Choose  program  object  and  press  OK.  A dialog  box  will  appear  prompting  you  to  fill  in 
pertinent  information  about  the  new  program  object  you  are  creating.  Fill  in  the  information  as 
described  below: 

Description:  EAMATE  SVGA  V4.2 

Command  Line:  C:\EAMATE\eamat42.exe 

Working  Directory:  C:\EAMATE 

Press  the  OK  button  and  size  the  EAMATE  program  group  and  place  it  in  a prominent  position 
on  the  desktop  so  that  it  will  be  easy  to  locate  by  the  users.  Make  sure  you  save  the  current 
settings  before  exiting  Microsoft  Windows. 

Exit  Microsoft  Windows  and  make  sure  you  are  at  the  root  directory. 

The  final  configuration  change  involves  PC-NFS.  The  directory  /export/home/ssa  located  on  the 
server  contains  files  that  are  accessed  by  both  the  user  interface  and  the  search  engine.  In  order 
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for  the  user  interface  to  use  this  directory,  it  must  be  mounted  as  a drive  on  the  PC  using  PC- 
NFS. 

Change  to  the  directory  C:\NFS. 

Type  nfsconf  at  the  DOS  prompt  and  the  NFS  Configuration  program  will  appear. 

Choose  Define  Drive  under  the  Resources  Menu. 

Fill  in  the  prompts  as  listed  below: 


Server: 

demeter 

Path: 

/export/home/ssa 

Sharing: 

ns 

Answer  NO  to  the  question,  "Do  you  want  to  change  the  data  transfer  options?" 

Hit  return. 

Press  Y in  response  to  the  question  about  mounting  the  resource. 

Next,  you  will  be  prompted  to  specify  a drive  letter  - choose  d: 

Hit  enter  twice  to  mount  the  resource  and  return  to  the  NFS  configuration  menu. 

Exit  the  configuration  menu. 

NOTE:  Make  sure  that  the  server  is  set  to  the  SPARCcenter  1000  where  the  data  is  stored. 

The  name  of  the  server  should  be  demeter. 

The  installation  and  configuration  of  the  EAMATE  V4.2  application  onto  the  client  workstations 
that  are  part  of  the  EEP  is  now  complete. 

Initializing  the  Statistics  Environment 

After  the  application  is  installed,  setup,  and  configured,  the  statistical  environment  needs  to  be 
initialized.  To  do  this,  perform  the  following  steps: 

Make  sure  you  are  in  the  DOS  environment,  not  Microsoft  Windows. 


B-4 


Change  to  the  C:\EAMATE  directory. 


Type  init  at  the  DOS  prompt. 

The  file  stat#.fil  has  now  been  initialized  (to  all  zeroes)  and  will  be  used  when  the  application  is 
opened  to  initialize  the  application  for  statistics-gathering  operations.  The  program  init  only 
needs  to  be  run  one  time  during  the  installation  process.  Once  initialized,  each  subsequent 
opening  of  the  application  will  use  the  last  set  of  statistics  as  a starting  point  thereby  providing  a 
running  total  (aggregate)  of  the  statistics  that  may  be  accessed  at  any  given  time.  If  init  is  run 
again,  the  statistics  which  have  been  gathered  to  this  point  will  be  deleted. 

Accessing  the  Statistics 

The  statistics  are  recorded  in  the  binary  file  stat#.fil.  To  access  the  statistics  in  ASCII  format, 
perform  the  following  steps: 

Make  sure  you  are  in  the  DOS  environment,  not  Microsoft  Windows. 

Change  to  the  C:\EAMATE  directory. 

Type  astat  at  the  DOS  prompt  and  follow  the  program  prompts,  entering  the  appropriate  file 
name.  The  result  of  the  program  will  be  a file  named  stat#.txt  and  it  will  contain  the  aggregate 
statistics  in  an  ASCII  format. 

For  example,  if  the  workstation  is  assigned  user  number  4,  then  you  want  to  access  the 
binary  file  stat4.fil  to  create  the  text  file  stat4.txt. 

One  other  miscellaneous  utility  program  exists  which  may  be  used  to  determine  the  user  number. 
To  execute  this  program,  perform  the  following  steps: 

Make  sure  you  are  in  the  DOS  environment,  not  Microsoft  Windows. 

Change  to  the  C:\EAMATE  directory. 

Type  whatuser  at  the  DOS  prompt. 

The  user  number  will  be  displayed  on  the  screen. 


B.2  File  Server 

This  section  outlines  the  steps  that  are  necessary  in  order  to  configure  the  file  server  for  use  with 
the  HAMATE  applications.  The  steps  in  this  section  should  be  supplemented  with  the  operating 
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system  and  system  administrator  reference  guides  available  with  Solaris  2.x,  the  on-line  "man" 
pages  on  the  file  server  system,  and  sections  6.3,  7,  and  8 of  this  document. 

NOTE:  The  file  server  host  name  should  be  set  to  "demeter",  as  this  is  the  file  server  name 

which  is  hard  coded  into  the  RPC  calls  at  several  locations. 

NOTE:  The  user  account  should  be  created  as  the  super  user  ("root"),  and  the  remainder  of 

the  steps  should  be  taken  while  logged  into  the  "ssa"  account. 

1.  Create  A User  Account 

References:  Solaris  2.x  documentation,  "man"  page  for  "admintool"  and  "passwd" 

The  file  server  configuration  relies  on  having  an  installed  user  account  where  all  of  the  data  is 
stored,  and  from  which  all  of  the  data  conversion,  indexing  and  searching  applications  are  run. 

This  account  is  created,  while  logged  in  as  "root",  by  using  the  "User  Account  Manager"  section 
of  the  "admintool"  UNIX  utility.  The  user  name  should  be  "ssa",  using  the  next  consecutive  user 
id  over  100.  The  login  shell  should  be  the  C shell  (/bin/csh),  and  the  home  directory  should  be 
/export/home/ssa.  The  account  should  be  password  protected,  which  can  be  accomplished  by  use 
of  the  "passwd"  command. 


2.  Create  Directory  Hierarchy 

References:  Solaris  2.x  documentation,  "man"  page  for  "share"  and  "vfstab",  section  7.x  of  this 
document 

Once  the  account  is  created,  it  is  necessary  to  create  the  directory  hierarchy  necessary  to  convert, 
index  and  search  the  data,  and  to  maintain  the  source  code.  This  directory  hierarchy  exists  under 
the  home  directory  of  the  "ssa"  account.  It  is  also  vital  that  the  home  directory  of  the  "ssa" 
account  be  exported  for  use  by  remote  workstations.  This  can  be  accomplished  by  use  of  the 
"share"  command  and  the  use  of  the  "/etc/dfs/dfstab"  file.  The  following  directories  should  be 
created: 


Root  Account  Directory: 
Root  Project  Directory: 
Unparsed  Data  Directory: 
Root  Browse  Data  Directory: 
Root  Detail  Data  Directory: 


/export/home/ssa  (DOES  NOT  NEED  TO  BE  CREATED) 

/export/home/ssa/ssacode 

/export/home/ssa/datahold 

/export/home/ ssa/1 99 1 BRW 

/export/home/ssa/ 1991 DET 


Browse  Data  Mount  Points:  /export/home/ssa/ 1991  BRW/ 1 ... 

/export/home/ ssa/ 1 99 1 BRW/n 


NOTE:  One  sub  directory  should  be  created  for  each  magnetic  hard  drive  which  will  be 

mounted  to  the  system  to  store  the  browse  data.  The  system  should  be  configured 
to  mount  these  magnetic  hard  drives  to  these  directories  at  boot  time  (using  the 


B-6 


/etc/vfstab  file).  When  the  system  is  set  up  and  mount  points  are  chosen,  an  entire 
2.1  GB  drive  should  be  mounted  to  the  /export/home/ssa  directory  in  order  to 
have  enough  space  to  store  the  index  and  duplicate  posting  files,  and  the  other  2.1 
GB  drives  should  be  mounted  to  the  browse  data  mount  points.  If  all  of  the  index 
and  duplicate  postings  files  cannot  be  stored  on  the  single  2.1  GB  disk  mounted  to 
the  /export/home/ssa  directory,  they  can  be  stored  somewhere  else.  However,  the 
files  MUST  be  symbolically  linked  back  to  the  /export/home/ssa  directory  in 
order  for  the  searching  applications  to  work. 

Detail  Data  Mount  Points:  /export/home/ssa/ 1 99 lDET/1  ... 

/export/home/ssa/ 1 99 1 DET/n 

NOTE:  One  sub  directory  should  be  created  for  each  side  of  each  platter  which  will  be 

mounted  to  the  system  to  store  the  detail  data.  The  system  should  be  configured 
to  mount  these  platters  to  these  directories  at  boot  time  (using  the  /etc/vfstab  file). 


3.  Install  the  Source  Code  and  Executables 

References:  Solaris  2.x  documentation,  "man"  page  for  "tar",  sections  6.3  and  7.1  of  this 
document 

Once  the  directory  hierarchy  is  set  up,  then  the  source  code  can  be  installed  from  the  4mm  DAT 
tape.  The  source  code  was  backed  up  using  the  "tar"  command,  and  a blocking  factor  of  1 024. 
The  data  should  be  restored  while  in  the  "ssacode"  sub  directory.  The  command  to  restore  the 
data  is: 

tar  -xvfb  <devicename>  1024 

where  <devicename>  is  the  device  name  of  the  4mm  DAT  tape  drive  (for  example:  /dev/rmt/1). 

When  this  tape  is  restored  in  the  /export/home/ssa/ssacode  directory,  the  following  sub 
directories  will  be  created,  and  will  contain  the  listed  source  code  files.  In  addition,  all  relevant 
"Makefiles"  will  be  copied  to  the  directories  listed  below. 

Include  Files:  ssacode/include 

btreestruct.h 

eamatestruct.h 

params.h 

paramsemplr.h 

Executable  Files:  ssacode/bin 

client 

debug 

download 

fix_parse 

index 

indexemplr 
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parse 

search_addmatch 

search_blanket 

search_browse 

search_detail 

search_header 

search_print 

search_single 

sysadm_print 

Library  Files: 

ssacode/lib 

libbtree_data.a 

libbtree_emplr.a 

libgen_eamate.a 

libtest.a 

Source  Files: 

Library  Source  Files: 

ssacode/src 

ssacode/src/lib 

./btree_data/btree_data.c 
./btree_emplr/btree_emplr.c 
./general/eamate.  c 
./general/general.c 
./test/test_functs.c 

Application  Source  Files: 

ssacode/src/bin 

./client/client.c 

./debug/debug.c 

./download/download.c 

./fix_parse/fix_parse.c 

./index/index.c 

./indexemplr/indexemplr.c 

./parse/parse.c 

./search_addmatch/search_addmatch.c 

./search_blanket/search_blanket.c 

./search_browse/search_browse.c 

./search_detail/search_detail.c 

./search_header/search_header.c 

./search_print/searchjprint.c 

./search_single/search_single.c 

./sysadm__print/sysadm_print.c 

Once  the  source  code  is  copied  into  the  directories,  then  it  can  be  compiled  and  installed  into  the 
final  directories.  The  "Makefiles"  included  with  the  source  code  will  work  for  the  SunPro 
compiler  for  Solaris  2.x.  If  a different  compiler  is  used,  some  of  the  flags  may  need  to  be 
changed.  The  "Makefiles"  have  three  options:  "make  bare",  "make  depend",  and  "make  install". 
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All  of  these  options  can  be  run  from  any  level  of  the  hierarchy,  but  should  be  finally  run  from  the 
root  directory  of  the  project  hierarchy  (/export/home/ssa/ssacode).  The  options  are  as  follows: 

- make  bare 

This  option  is  used  to  clean  out  old  copies  of  executables  and  libraries  before  a new 
copy  is  made.  The  use  of  this  option  will  clean  out  the  ssacode/bin  and  the 
ssacode/lib  directories,  and  will  remove  the  executable  and  object  code  files  from 
each  of  the  source  code  sub  directories.  This  will  ensure  that  the  next  time  "make 
install"  is  run,  all  of  the  source  code  will  be  recompiled. 

- make  depend 

This  option  is  used  to  generate  the  lists  of  source  code  modules,  libraries  and  include 
files  which  a given  source  code  module  depends  upon.  This  will  ensure  that  an 
executable  will  be  recompiled  every  time  that  a module  that  it  depends  upon  is 
modified. 

make  install 

This  option  is  used  to  actually  compile  any  source  code  modules  which  are  out  of  date 
with  regard  to  the  current  executable.  In  addition,  it  will  place  the  compiled  libraries 
in  the  ssacode/lib  directory,  and  the  compiled  executables  in  the  ssacode/bin 
directory. 

To  install  the  source  code,  from  the  "ssacode"  directory,  a "make  bare"  should  be  issued,  then  a 
"make  depend",  and  then  a "make  install".  Once  these  steps  are  successfully  executed,  then  the 
executable  files  in  the  ssacode/bin  directory  can  be  copied  into  the  home  directory  of  the  user 
account  (/export/home/ssa). 


4.  Convert  and  Index  the  Data 

References:  Solaris  2.x  documentation,  section  7 of  this  document 

Once  the  directory  hierarchy  is  set  up,  and  the  applications  are  installed,  the  data  can  be 
downloaded  and  converted.  Basically,  this  entails  transferring  the  unprocessed  COM  files  to  the 
/export/home/ssa/datahold  directory,  parsing  the  files  into  browse  and  detail  data,  and  indexing 
the  data.  Step  by  step  directions  on  how  to  complete  this  process  can  be  found  in  section  7.2  of 
this  document. 


5.  Start  the  Search  Applications 

References:  Solaris  2.x  documentation,  section  8 of  this  document 

Once  the  data  is  indexed,  then  the  system  is  ready  to  be  set  up  for  requests  from  a remote 
workstation.  This  consists  of  starting  the  search  applications,  and  step-by-step  instructions  for 
this  process  can  be  found  in  section  8 of  this  document. 
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C System  Error  Messages 


This  Appendix  details  error  messages  that  may  be  printed  by  the  user  interface  code  or  the 
applications  resident  on  the  file  server  (data  conversion,  indexing  and  searching).  Each  error 
message  is  followed  by  an  explanation  of  the  error,  and  possible  conditions  which  may  generate 
the  error. 


C.l  User  Interface  Error  Messages 

The  EAMATE  User  Interface  Prototype  provides  a variety  of  error  trapping  and  reporting 
techniques  and  capabilities.  These  range  from  interactive  message  boxes  and  message  beeps  to 
specific  messages  recorded  in  a local  file  that  resides  on  each  client.  Message  beeps  occur  when 
the  user  attempts  to  input  disallowed  characters  into  an  input  field.  For  example,  the  SSN  field 
will  only  accept  digits,  so  if  a user  types  a non-digit  character  the  system  will  beep  and  the  illegal 
character  will  not  be  recorded.  The  system  will  then  wait  for  a legal  character  to  be  entered. 

Message  boxes  appear  when  legal  but  invalid  data  has  been  entered  and  also  when  system  errors 
occur.  For  example,  if  a user  enters  a legal  first  name  but  does  not  enter  a last  name,  a message 
box  will  appear  indicating  that  if  a first  name  is  entered,  then  a last  name  must  also  be  entered. 
Message  boxes  also  appear  when  system  errors  occurs  such  as  an  unlocatable  file. 

The  third  mechanism  for  indicating  errors  is  the  local  error  file  (err.fil)  located  on  each  client. 
When  particular  errors  occur,  such  as  null  file  handles  or  communication  errors,  these  problems, 
along  with  identifying  information,  are  recorded  in  the  local  error  file.  When  a problems  occurs, 
the  system  administrator  can  merely  look  at  the  last  message  in  the  error  file  for  help  in  trouble 
shooting.  Below  is  a list  of  possible  errors  and  corresponding  error  handling  procedures  and 
indicators  with  the  exception  of  message  beeps  that  deal  with  entry  of  illegal  characters. 


C.1.1  Error  Message  Boxes 

This  section  displays  all  the  error/message  boxes  incorporated  into  the  user  interface  prototype 
and  provides  the  name  of  the  box  (as  contained  in  the  dialog.dlg  file)  and  the  reason  for  its 
appearance. 
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BLANKERR  appears  when  the  application  is  unable  to  open  the  data  file  needed  to  create  the 
blanket  information  screen. 


BLANKETERR  appears  when  the  creation  of  a client  handle  fails  during  a request  for  blanket 
information  or  when  the  system  fails  to  set  the  retry  time  out  during  the  request  for  blanket 
information  or  if  the  RPC  call  fails  during  a request  for  blanket  information. 
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System  Unable  to  Open 
Data  File 


No  Entries  Were  Added 
to  the  List  Box 


See  System 
Administrator 


DATAERR  appears  when  the  application  is  unable  to  open  the  file  containing  browse 
information. 


System  Unable  to  Open 
detl*.txt  File 

See  System 
Administrator 


DETAILTXT  appears  when  the  application  is  unable  to  open  the  file  containing  detail 
information. 
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WAIT! 


o 

No  Report  Exists  for 
the  Requested  EIN 
and  YEAR 

Press  OK,  Hit 
Return  or  ESC,  and 
Re-Enter  the  EIN 


EINERROR  appears  when  an  incorrect  EIN  has  been  entered. 


WAIT! 


No  Report  Exists  for  the 
Requested  EIN  or  Report  Number 

Press  OK,  Hit  Return  or  ESC, 
and  Re-Enter  the  EIN  or 
Report  Number 

NOTE:  This  Box  Also  Appears 
When  You  Try  to  Print  a RIe 
Larger  Than  5000  Employees. 
See  the  System  Administrator  to 
Print  Large  Reports. 


EINORSEQ  appears  when  an  incorrect  EIN  or  an  incorrect  report  number  has  been  entered 
during  a print  request.  It  also  appears  if  the  file  that  has  been  requested  for  print  contains  more 
than  5000  employees. 
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ERRORFILE  appears  when  the  application  is  unable  to  open  the  local  error  file. 


System  Unable  to  Open 
hdr*.txt  File 


See  System 
Administrator 


HEADERTXT  appears  when  the  application  is  unable  to  open  the  employer  information  file. 
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System  Unable  to  Locate 
the  Files  Associated  with 
the  Next  Window 

See  System 
Administrator 


MISSINGFILE  appears  when  the  application  is  unable  to  open  the  employer  information  file  and 
the  browse  information  file  before  creating  the  query  information  screen  or  the  browse 
information  screen. 


WAIT! 


No  Report 
Exists  for  the 
Requested  MRN 

Press  OK,  Hit 
Return  or  ESC,  and 
Re-Enter  the  MRN 


MRNERR  appears  when  an  incorrect  MRN  has  been  entered  during  a browse  query. 


C-6 


NMSG  appears  when  a first  name  but  no  last  name  has  been  entered  or  vice  versa. 


No  Matches  Found 
for  this  Query 

Please  Check 
Parameters  and 
Re-Enter 


NOMATCH  appears  when  no  approximate  matches  are  returned  for  a target  individual. 
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NOMORE  appears  when  all  additional  matches  have  been  displayed  and  no  more  remain. 


System  Unable  to 
initialize  Next  Window 
Due  to  Fiie  Problems 

See  System 
Administrator 


NULLPTR  appears  when  the  application  is  unable  to  open  the  employer  information  file  and  the 
blanket  information  file  during  initialization  of  the  blanket  information  screen.  It  also  appears 
when  the  application  is  unable  to  open  the  employer  information  file  and  the  browse  information 
file  during  the  initialization  of  the  query  information  screen. 
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WAIT! 


o 

System  Does  Not 
Recognize  This  Password 

Please  Re-Enter  the 
Password 


PWERROR  appears  when  an  incorrect  password  has  been  entered. 


QMSG  appears  when  an  illegal  combination  of  the  name  and  social  security  fields  has  been 
entered. 
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A System  Error  Has 
Occurred 


See  System 
Administrator 


QUERYERROR  appears  as  a result  of  a variety  of  situations.  It  is  the  basic  generic  system  error 
message  and  indicates  problems  with  remote  procedure  calls.  Details  of  specific  errors  may  be 
found  in  the  local  error  file  which  should  be  accessed  anytime  QUERYERROR  appears. 


QUERYTXT  appears  when  the  application  is  unable  to  open  the  query  information  file. 
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WAIT! 

No  Report  Exists 
for  the  Requested 
Report  Number 

Clear  This  Message  by 
Pressing  OK  and  Re-Try 
Desired  Operation  with  a 
Different  Report  Number 


SEQERR  appears  when  an  incorrect  report  number  has  been  entered. 


STATEMPTY  appears  when  the  statistics  file  contains  no  data. 
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System  Unable 
to  Open  Stat^.fil 
For  Reading 

See  System 
Administrator 


STATOPEN  appears  when  the  application  is  unable  to  open  the  statistics  file  in  preparation  for  a 
read  operation. 


A A 


System  Unable 
to  Open  Stat*.fil 
For  Writing 

See  System 
Administrator 


STATWOPEN  appears  when  the  application  is  unable  to  open  the  statistics  file  in  preparation  for 
a write  operation. 
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System  Unable  to 
Write  to  Stat*.fll  File 


See  System 
Administrator 


STATWRITE  appears  when  the  application  is  unable  to  write  to  the  statistics  file. 


A A 


A System  Error 
Has  Occurred 

See  System 
Administrator 


SYSERR  appears  when  the  RPC  call  fails  during  a print  request. 
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System  Unable  to 
Assign  User  Number 

See  System 
Administrator 

Application  Will  Not 
Respond  Properly 
Without  Correct 
User  Number 


USERERR  appears  when  the  application  is  unable  to  open  the  user  number  file  or  when  the  user 
number  file  is  empty. 


WAIT! 


No  Report  Exists  for  that  Year. 
Please  Backspace  and 
Re-Enter  the  Year. 


YEAR_ERR  appears  when  the  incorrect  year  has  been  entered. 
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C.1.2  Error  Messages  in  the  Local  Error  File  (err.fil) 

This  section  describes  error  messages  that  are  recorded  in  the  local  error  file  due  to 
communications  and  data  errors.  It  outlines  format  and  explains  terminology  used  in  the  error 
messages. 

The  first  line  of  each  message  will  always  contain  three  parts: 

• screen  or  operation  that  error  occurred  in 

• the  remote  function  being  called 

• the  type  of  RPC  call  being  called 

For  example,  if  the  first  line  of  the  message  is:  Single  Query,  Get  Seq  Header,  clnt_create,  then 
the  error  occurred  during  a single  query  operation,  while  calling  the  remote  function 
get_seq_header,  and  trying  to  create  a client  handle.  A message  displayed  in  uppercase  letters 
reports  more  detailed  information  about  the  error,  i.e.,  SEARCH  ENGINE  COULD  NOT  FIND 
EIN. 

Additional  terms  incorporated  into  the  error  messages  include  RPC  ERROR  and  T_ERRNO  - 
numeric  values  which  report  RPC  creation  errors  and  lower  level  errors,  respectively. 
Interpretation  of  these  two  errors  may  be  accomplished  by  referring  to  the  files  clnt.h  and  xti.h 
(which  ship  with  PC-NFS  Toolkit)  and  examining  values  for  rpc_createerr  and  t_ermo. 

Two  other  pieces  of  information  recorded  in  the  error  file  (when  appropriate)  are  the  results  of 
the  RPC  call  itself  and  the  result  of  the  RPC  call  returned  by  the  search  engine.  These  messages 
are  indicated  by  the  terms  RPCRES  (RPC  result)  and  RES  (search  engine  result)  in  the  error  file. 
Additional  letters  are  prefixed  to  these  terms  and  indicate  what  remote  function  was  being  called. 
For  example,  HRPCRES  represents  the  RPC  call  result  for  the  remote  function  get_seq_header 
(employer  header).  The  different  terms  used  to  report  RPC  results  and  search  engine  RPC  results 
include: 


Prefix 

A - additional  matches 

B - blanket 

Br  - browse 

D - detail 

H - header 

P - print 

S - single  query 


RPC  Result 

ARPCRES 

BRPCRES 

BrRPCRES 

DRPCRES 

HRPCRES 

PRPCRES 

SRPCRES 


Search  Engine  Result 

ARES 

BRES 

BrRES 

DUES 

HRES 

PRES 

SRES 


The  search  engine  will  return  a 0 upon  success  and  a -1  upon  failure.  The  rpc  call  will  return  0 
upon  success  and  various  numerical  values  upon  failure.  Again,  rpc_createerr  must  be 
interpreted  (using  the  PC-NFS  Toolkit  documentation)  to  determine  the  rpc  call  result  status. 
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Listed  below  are  all  of  the  messages  that  may  be  recorded  in  the  local  error  file.  They  are 
divided  into  communications  and  data  error  sections  and  further  divided  into  subsections  which 
indicate  what  operation  was  being  attempted  when  the  error  occurred. 


Communications  Errors 

Single  Query  Messages: 

Single  Query,  Get  Seq  Header,  clnt_create 
CLIENT  HANDLE  IS  NULL 

* = RPC  ERROR 

* = T ERRNO 


Single  Query,  Get  Seq  Header,  clnt_control 
RE-TRY  TIMEOUT  WAS  NOT  SET 

Single  Query,  Get  Seq  Header,  clnt_call 
HRPCRES  = ** 

HUES  =** 

* = RPC  ERROR 

* = T ERRNO 


Single  Query,  Single  Query,  clnt_create 
CLIENT  HANDLE  IS  NULL 

* = RPC  ERROR 

* = T ERRNO 


Single  Query,  Single  Query,  clnt_control 
RE-TRY  TIMEOUT  WAS  NOT  SET 

Single  Query,  Single  Query,  clnt_call 
**  = SRPCRES 
**  = SRES 

* = RPC  ERROR 

* = T ERRNO 


Blanket  Messages: 

Query  Info,  Get  Blanket,  clnt_create 
CLIENT  HANDLE  IS  NULL 

* = RPC  ERROR 

* = T_ERRNO 

Query  Info,  Get  Blanket,  clnt_control 
RE-TRY  TIMEOUT  WAS  NOT  SET 
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Query  Info,  Get  Blanket,  clnt_call 

**=BRPCRES 

**=BRES 

* = RPC  ERROR 

* = T_ERRNO 

Browse  Report  Messages: 

Browse,  Browse  Report,  clnt_create 
CLIENT  HANDLE  IS  NULL 

* = RPC  ERROR 

* = T_ERRNO 

Browse,  Browse  Report,  clnt_control 
RE-TRY  TIMEOUT  WAS  NOT  SET 

Browse,  Browse  Report,  clnt_call 

**=BrRPCRES 

**=BrRES 

* = RPC  ERROR 

* = T_ERRNO 

Browse,  Get  Seq  Header,  clnt_create 
CLIENT  HANDLE  IS  NULL 

* = RPC  ERROR 

* = T_ERRNO 

Browse,  Get  Seq  Header,  clnt_control 
RE-TRY  TIMEOUT  WAS  NOT  SET 

Browse,  Get  Seq  Header,  clnt_call 
**  = BrRPCRES 
**  =BrRES 

* = RPC  ERROR 

* = T_ERRNO 

Browse,  Get  Empl  Detail,  clnt_create 
CLIENT  HANDLE  IS  NULL 

* = RPC  ERROR 

* = T_ERRNO 

Browse,  Get  Empl  Detail,  clnt_control 
RE-TRY  TIMEOUT  WAS  NOT  SET 
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Browse,  Get  Empl  Detail,  clnt_call 

**=DRPCRES 

**=DRES 

* = RPC  ERROR 

* = T ERRNO 


Print  Report  Messages: 

Print , Print  Report,  rpc_call 

**=PRPCRES 

**  = PRES 

* = RPC  ERROR 

* = T_ERRNO 

Query  Info  Messages: 

Change  Header,  Get  Seq  Header,  clnt_create 
CLIENT  HANDLE  IS  NULL 

* = RPC  ERROR 

* = T_ERRNO 

Change  Header,  Get  Seq  Header,  clnt_control 
RE-TRY  TIMEOUT  WAS  NOT  SET 

Change  Header,  Get  Seq  Header,  clnt_call 
HRPCRES  = ** 

HRES  = ** 

* = RPC  ERROR 

* = T_ERRNO 

Query  Info,  Add  Matches,  clnt_create 
CLIENT  HANDLE  IS  NULL 

* = RPC  ERROR 

* = T_ERRNO 

Query  Info,  Add  Matches,  clnt_control 
RE-TRY  TIMEOUT  WAS  NOT  SET 

Query  Info,  Add  Matches,  clnt_call 

**=ARPCRES 

**=ARES 

* = RPC  ERROR 

* = T ERRNO 
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Query  Info,  Get  Empl  Detail,  clnt_create 
CLIENT  HANDLE  IS  NULL 

* = RPC  ERROR 

* = T ERRNO 


Query  Info,  Get  Empl  Detail,  clnt_control 
RE-TRY  TIMEOUT  WAS  NOT  SET 

Query  Info,  Get  Empl  Detail,  clnt_call 
**  = DRPCRES 
**  = DRES 

* = RPC  ERROR 

* = T ERRNO 


Data  Errors 

Single  Query  Messages: 

Single  Query,  Get  Seq  Header,  clnt_call 
HRPCRES  = ** 

HRES  = ** 

SEARCH  ENGINE  COULD  NOT  FIND  EIN 

Single  Query,  Single  Query,  clnt_call 
NO  MATCHES  TO  THIS  QUERY 

Blanket  Messages: 

Query  Info,  Get  Blanket,  clnt_call 
**=BRPCRES 
* = BRES 

SEARCH  ENGINE  COULD  NOT  FIND  SEQUENCE  NUMBER 


Browse  Report  Messages: 

Browse,  Browse  Report,  clnt_call 
BrRPCRES  = ** 

BrRES  = ** 

SEARCH  ENGINE  COULD  NOT  FIND  MRN 

Browse,  Get  Seq  Header,  clnt_call 
BrRPCRES  = ** 

BrRES  = ** 

SEARCH  ENGINE  COULD  NOT  FIND  EIN 
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Print  Report  Messages: 

Print,  Print  Report,  rpc_call 

**=PRPCRES 

**  = PRES 

SEARCH  ENGINE  COULD  NOT  FIND  EIN  or  SEQ  NO. 

OR  REPORT  CONTAINS  MORE  THAN  5000  EMPLOYEES 

Query  Info  Messages: 

Change  Header,  Get  Seq  Header,  clnt_call 
HRPCRES  = ** 

HRES  = ** 

SEARCH  ENGINE  COULD  NOT  FIND  SEQUENCE  NUMBER 

Query  Info,  Add  Matches,  clnt_call 
NO  MORE  MATCHES  FOUND 
**=ARES 


* numeric  value  held  in  the  variable  rpc_createerr  or  t_ermo 
**  appropriate  numerical  value  for  result  of  RPC  call  or  result 
returned  by  search  engine 


C.2  File  Server  Applications  Error  Messages 

This  section  covers  error  messages  generated  by  applications  resident  on  the  file  server.  These 
are  errors  that  could  occur  during  the  data  conversion  process,  the  indexing  process,  or  the 
searching  process.  They  could  also  occur  in  any  of  the  debugging  programs  resident  on  the  file 
server. 

ERROR:  Cannot  create  client  handle 

This  error  can  occur  in  the  client.c  debugging  program.  It  will  occur  if  the  client  handle  used  to 
access  the  RPC  call  cannot  be  created.  A possible  reason  for  the  error  may  be  that  the  file  server 
search  applications  are  not  running. 

ERROR:  Cannot  modify  client  handle 

This  error  can  occur  in  the  client.c  debugging  program.  It  will  occur  if  the  client  handle  used  to 
access  the  RPC  call  cannot  be  modified  to  extend  the  time-out. 
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ERROR:  Cannot  open  file  <filename> 

This  is  a general  error  message  which  can  occur  in  any  of  the  application  modules.  It  will  occur 
if  a file  cannot  be  created  or  open  (for  read  or  write).  Possible  reasons  for  this  error  are  if  the  file 
does  not  exist,  or  if  the  permissions  on  the  file  or  the  directory  are  not  set  correctly. 

ERROR:  Cannot  read  detail  file 
ERROR:  Cannot  read  query 
ERROR:  Cannot  write  query 
ERROR:  Cannot  write  to  output  file 

These  errors  occur  when  a read  or  write  error  is  encountered, 
search  application  modules,  or  the  data  conversion  modules. 

Possible  reasons  for  these  errors  are  if  the  permissions  on  the 
correctly. 

ERROR:  Cannot  register  <function> 

This  error  could  occur  in  any  of  the  search  application  modules 
functions  caimot  be  registered  for  use. 

ERROR:  Could  not  complete  operation 

This  error  could  occur  in  the  debugging  application.  It  will  occur  if  any  of  the  debug  choices 
return  a value  of  FAIL.  It  will  always  be  accompanied  by  a more  descriptive  message  printed 
within  the  failed  debug  module. 

ERROR:  Employer  header  not  found  for  this  EIN 

This  error  could  occur  in  any  of  the  searching  applications.  It  will  occur  if  the  specified  EIN  in 
the  request  does  not  have  an  associated  report. 

ERROR:  Employer  header  not  found  for  this  Sequence 

This  error  could  occur  in  any  of  the  searching  applications.  It  will  occur  if  the  specified  EIN  and 
sequence  number  in  the  request  does  not  have  an  associated  report. 

ERROR:  Employer  Report  Too  Large  to  Print  — See  System  Administrator 

This  error  will  occur  if  a print  report  is  requested  for  an  employer  report  which  is  over  5000 
records.  It  is  determined  to  be  an  error  in  order  to  limit  the  size  of  employer  reports  that  a user 
can  print.  If  the  report  needs  to  be  printed,  the  system  administrator  can  print  the  report. 


They  could  occur  in  any  of  the 
or  the  debugging  applications, 
file  or  the  directory  are  not  set 


. It  will  occur  if  one  of  the  RPC 
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ERROR:  File  inconsistency  in  <filename>  --  1st  record  not  an  employer  header 

This  error  will  occur  during  the  data  conversion  of  the  COM  file.  It  will  occur  because  it  is 
expecting  an  employer  report  to  always  begin  with  an  employer  header  record.  This  error  does 
not  mess  up  the  parse  process,  there  is  no  need  to  run  fix_parse.  Just  re-parse  this  employer  file 
once  the  inconsistency  is  fixed. 

ERROR:  Illegal  Employee  Record  in  <filename> 

This  error  will  occur  during  the  "check  data"  option  of  the  debugging  application.  It  will  occur  if 
an  employee  record  occurs  after  a final  total  record,  or  before  the  employer  header  record. 

ERROR:  Invalid  typeid  at  offset  <offset> 

This  error  will  occur  during  a detailed  employee  information  request  if  the  offset  sent  to  the 
search  application  does  not  match  an  employee  detail  record. 


ERROR:  No  entry  in  parse  control  file  for  <EIN> 

This  error  message  can  occur  in  the  fix_parse  application  when  an  EIN  or  an  EIN/sequence 
number  combination  is  chosen  to  be  deleted,  and  it  is  not  in  the  parse  control  file. 

ERROR:  No  more  matches  available 

This  error  will  occur  during  an  Add  Matches  request  if  there  are  no  more  matches  for  the  current 
search  query.  It  is  actually  not  an  error  message,  but  more  an  indication  of  the  end  of  an 
operation. 

ERROR:  Returned  from  svcjrunQ  in  <function> 

This  error  message  can  occur  during  any  of  the  searching  applications.  It  ^vill  occur  if  the 
application  returns  from  the  RPC  request  wait  loop. 

ERROR:  Search_recordQ  function  returned  FAIL 

This  error  message  can  occur  during  the  search  single  application,  and  will  occur  if  there  is  a 
system  error  during  the  actual  search.  It  would  most  likely  occur  if  enough  memory  is  not 
available  to  allocate  for  the  search. 

ERROR:  This  file  already  exists 

This  error  message  can  occur  during  the  debugging  application.  It  will  occur  if  the  output  file 
specified  already  exists.  It  is  done  in  order  to  avoid  wiping  out  important  files,  such  as  index  or 
search  statistic  files. 
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ERROR:  Unable  to  Allocate  Memory 

This  error  message  can  occur  during  the  indexing  application.  It  will  occur  if  enough  memory 
cannot  be  allocated  to  create  and  store  the  btree  in  memory.  If  this  error  occurs,  simply  remove 
all  of  the  .idx,  .dup,  and  .tmp  files  created  by  the  index  application  for  the  EIN  that  the 
application  fails  on,  and  reindex  the  employer  report. 

ERROR:  Unidentified  Record  in  <filename>  at  location  <ojfset> 

This  error  message  can  occur  during  the  data  conversion  process.  It  will  occur  if  there  is  an 
unidentified  record  type  in  the  COM  file  (if  there  is  garbage  in  the  file). 

ERROR:  Unable  to  browse  report 

This  error  message  can  occur  during  the  search  browse  application.  It  will  occur  if  a browse  file 
for  the  specified  EIN  and  sequence  number  does  not  exist. 
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D Listing  of  the  Code 


Section  D.l  contains  the  user  interface  code  and  section  D.2  contains  the  search  engine  code. 
The  page  numbering  in  these  sections  is  formatted  such  that  each  makefile,  code  module,  include 
file  and/or  library,  has  its  source  code  numbered  individually. 
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//  Filename:  GENERIC. H 

//  "EAMAT42"  Generated  by  WindowsMAKER  Professional. 

//  Author:  Laura  L.  Downey 

// 

II  ************************************************************************* 

//Do  not  add  code  here. 

// 

//  This  file  is  maintained  by  WindowsMAKER  Professional. 

//  As  you  make  changes  in  your  application  using  WindowsMAKER  Professional, 
//  this  file  is  automatically  updated,  therefore  you  never  modify  this  file. 
// 

// 

// 

//  For  more  information, 

//  see  the  section  "How  code  is  generated"  in  the  documentation. 

// 

II  *********************************************************************** 

// 


#include 

#include 

#include 

#include 

finclude 

#include 

tinclude 


"MFEDIT.H" 
"STRUCT. H" 
"STRING. H" 
"GLOBALl .H" 
"STDIO.H" 
"STDLIB.H" 
"CTYPE.H" 


//  Give  access  to  variables 
extern  HINSTANCE  hinst; 
extern  HWND' 
extern  UINT 
extern  BOOL 


in  all  code  modules 


extern  DWORD 
extern  BOOL 


extern  HINSTANCE 
extern  HWND 
extern  UINT 
extern 

extern  DLGPROC  MAINlpProc; 


MainhWnd; 
wHelpMessage; 
bHelpSupport ; 
dwDialogProp; 
b256Color ; 
hBMPInst ; 

hMDIClient;  // 

idMDIFirstChild; // 


HWND  MAINhDlg; 


Handle  to  client  window  for  MDI . 
ID  to  first  child  for  MDI. 


II  ************************************************************* 

//  Variables,  types  and  constants  for  controls  in  main  window. 

II  ************************************************************* 


extern  HWND  hClient;  //  Handle  to  window  in  client  area, 

extern  DLGPROC  IpClient;  //  Function  for  window  in  client  area, 

extern  UINT  wBLDWindowType; 

#def ine  CLIENTSTRIP  WS_MINIMIZE | WS_MAXIMIZE | WS_CAPTION | WS_BORDER | WS_DLGFRAME | WS_SYSMENU I WS 
_POPUP I WS_THICKFRAME | DS_MODALFRAME | DS_SYSMODAL 

#define  TOOLBARSTRIP  WS_MINIMIZE | WS_MAXIMIZE | WS_POPUP I DS_SYSMODAL 

typedef  struct 

( 

long  style; 

//  MORE  . . . 

} BLD  DLGTEMPLATE; 


typedef  BLD_DLGTEMPLATE  far 


*LPBLD  DLGTEMPLATE; 


#define  BLDTOOLBARTOP  1 
#define  BLDTOOLBARBOTTOM  2 
#define  BLDTOOLBARLEFT  3 
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tdefine  BLDTOOLBARRIGHT  4 
#define  BLDDLGCLIENT  5 
#define  BLDDLGMODAL  6 
#define  BLDDLGMODELESS  7 


//  Constants  for  error  message  strings 


#def ine 

BLD  CannotRun 

4000 

# define 

BLD_Cannot Create 

4001 

#def ine 

BLD_CannotLoadMenu 

4002 

#def ine 

BLD_CannotLoadIcon 

4003 

#def ine 

BLD_CannotLoadBitmap 

4004 

#def ine 

//  User 

BLD_CannotCreateWindow 

defined  constant  ID's 

4005 

#def ine 

IDMF_P as sword 

10005 

#def ine 

IDLB  QMatch 

10009 

#def ine 

IDMF_QEIN 

10012 

#def ine 

IDMF_PEIN 

10018 

#def ine 

ID_BEmprHeader 

10021 

#def ine 

ID  QEmprHeader 

10022 

#def ine 

IDLB_BMatch 

10023 

#def ine 

ID_HDetail 

10024 

#def ine 

ID_EDetail 

10027 

#def ine 

IDPRINTED 

10029 

#def ine 

IDPRINTHD 

10030 

#def ine 

IDPRINTB 

10031 

#def ine 

IDBlanket 

10032 

#deflne 

ID  QAddMatch 

10034 

#def ine 

ID_BrEmprHeader 

10035 

#def ine 

IDLB_BrMatch 

10036 

#def ine 

IDMF_REIN 

10039 

#def ine 

IDMF_BrEIN 

10044 

#def ine 

ID_BrRepTot 

10050 

#def ine 

ID_BRepTot 

10051 

#def ine 

ID_QRepTot 

10052 

#def ine 

ID_BrAddRec 

10053 

#def ine 

IDPRINTTOT 

10055 

#def ine 

ID_CONT 

10056 

tdefine 

ID_Tot 

10057 

#def ine 

IDMF_NumCopies 

10059 

#def ine 

IDMF_Qyear 

10060 

#def ine 

IDMF_QEstab 

10061 

#def ine 

IDMF  LName 

10062 

#def ine 

IDMF_FName 

10063 

#def ine 

IDMF_QSSN 

10064 

#def ine 

IDMF_Bryear 

10067 

#def ine 

IDMF_BrEstab 

10068 

#def ine 

IDMF_BrStart 

10069 

#def ine 

IDMF_pyear 

10071 

#def ine 

IDMF_PEstab 

10072 

#def ine 

IDMF_Ryear 

10073 

#def ine 

IDMF  REstab 

10074 

#def ine 

IDCONT 

10075 

#def ine 

IDMF_PSeq 

10076 

#def ine 

ID_Change 

10077 

#def ine 

ID_SeqNo 

10078 

#def ine 

ID_TotEIN 

10079 

#def ine 

ID_TotRpt 

10080 

#def ine 

qp_year 

10087 

#def ine 

qp_ein 

10088 

#def ine 

qp_estab 

10089 

3 
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#define  ID_QlYes 
#define  ID_QlNo 
tdefine  ID_Q2yes 
tdefine  ID_Q2No 
tdefine  ID  CLOSE 


tdefine  qp_lname 
tdefine  qp_fname 
tdefine  qp_ssn 


10090 

10091 

10092 

10093 

10094 

10095 

10096 

10097 


//  WindowsMAKER  automatic  generated  constant  ID's 
tdefine  WMPDEBUG  static  void  WMPDebugDummy ( ) ( } 


//  Help  ID'S  used  by  functions 


tif  !de-fined(THISISBLDRC) 

int  PASCAL  WinMain (HINSTANCE, HINSTANCE, LPSTR, int) ; 

LRESULT  CALLBACK  BLDMainWndProc (HWND, UINT, WPARAM, LPARAM) ; 

LRESULT  BLDDefWindowProc (HWND, UINT, WPARAM, LPARAM) ; 

BOOL  BLDKeyTranslation (MSG  *); 

BOOL  BLDInitApplication (HINSTANCE, HINSTANCE, int  *,LPSTR); 

BOOL  BLDExitApplication ( void) ; 

HWND  BLDCreateClientControls (char  *,DLGPROC); 

BOOL  BLDInitMainMenu (HWND) ; 

BOOL  BLDMenuCommand(HWND,UINT, WPARAM, LPARAM) ; 

BOOL  BLDMenuHelp (HWND, UINT, WPARAM, LPARAM) ; 

BOOL  BLDRegisterClass (HINSTANCE) ; ' 

HWND  BLDCreateWindow (HINSTANCE) ; 

int  BLDDisplayMessage (HWND, UINT, char  *,int); 

BOOL  BLDSwitchMenu (HWND, char  *); 

HMENU  BLDLoadMenu (HWND, char  * , HMENU  *); 

BOOL  BLDDrawBitmap (LPDRAWITEMSTRUCT, char  *,BOOL); 

BOOL  BLDDrawIcon (LPDRAWITEMSTRUCT, char  *); 
void ■ BLDMoveWindow (HWND, int, int, int , int , BOOL) ; 

BOOL  BLDSendMDIMessage (HWND, UINT) ; 

BOOL  BLDDrawBkgndIcon (HWND, PAINTSTRUCT  *,char  *,int); 

BOOL  BLDDrawBkgndBitmap (HWND, PAINTSTRUCT  *,char  *, int , BOOL, BOOL) ; 

BOOL  BLDDrawAutoState (LPDRAWITEMSTRUCT, char  *, BOOL, BOOL ) ; 

BOOL  BLDDrawStateBitmap (LPDRAWITEMSTRUCT, char  *,char  *,char  *,char  *,BOOL); 

BOOL  BLDDrawStatelcon  (LPDRAWITEMSTRUCT,  char  *,char  ’',char  *,char  *); 

void  BLDGetDlgScrolled (HWND, int  *,int  *); 

void  BLDSetDlgScrolled (HWND, int , int ) ; 

void  BLDFindCtrlsRightBottom (HWND, int  *,int  *); 

void  BLDCalcScrollRanges (HWND, int  *,int  * , int , int , int , int ) ; 

BOOL  BLDScrollDlg (HWND, UINT, int, int, int, int, int, int, int, int, BOOL) ; 

BOOL  BLDExitScrollDlg (HWND) ; 

BOOL  BLDSizeDlg (HWND, int , int ) ; 

HBITMAP  BLDLoadBitmap (HANDLE, char  *); 

HWND  BLDCreateClientDlg (char  *, HWND, UINT, DLGPROC, int , BOOL) ; 

LRESULT  BLDSizeToolBars (HWND, UINT, int, int, int, BOOL) ; 
void  BLDCalcToolbarFrame (HWND, int  *,int  *,int  *,int  *); 
void  BLDMoveDlgClient (HWND, HWND) ; 
void  BLDSetClientFocus (HWND  hWnd) ; 
void  BLDClientMove (HWND  hWnd) ; 

BOOL  BLDInitCtrlFont (HWND, int , int,  int,  int,  int,  int,  BYTE,  BYTE,  BYTE,  BYTE,  BYTE,  BYTE, 
BYTE,  BYTE,  char  *); 

BOOL  BLDExitCtrlFont (HWND, int) ; 

BOOL  BLDInitSolidBrush (HWND, COLORREF) ; 

BOOL  BLDInitPatternBrush (HWND, char  *); 

BOOL  BLDExitBrush (HWND) ; 
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HBRUSH  BLDCtlColorStockBrush (HWND, int ) ; 

HBRUSH  BLDCtlColorPropBrush (HWND) ; 

HBRUSH  BLDCtlColorDefaultBrush (HWND) ; 

HBRUSH  BLDCtlColorBrushSetOrg(HWND, HDC) ; 

BOOL  BLDCheckFlHelpKey (BOOL) ; 
void  BLDHelpTranslation (MSG  *) ; 
void  BLDShowHelp (HWND, UINT, DWORD) ; 

BOOL  BLDHelpFilter (HWND, UINT,WPARAM,LPARAM, DWORD, LPARAM  *,BOOL); 
BOOL  BLDGetHelpFileName (char  *); 

LRESULT  BLDDefWindowProcMsg (HWND, UINT,WPARAM, LPARAM) ; 

BOOL  BLDMainRegClass (HINSTANCE) ; 

BOOL  BLDMainRegClassDef (HINSTANCE) ; 

BOOL  BLDMainExitClass (void) ; 

BOOL  BLDMainExitClassDef (void) ; 

HWND  BLDMainCreateWnd (void) ; 

HWND  BLDMainCreateWndDef (void) ; 

BOOL  BLDWndMsgFilter (HWND, UINT,WPARAM, LPARAM, DWORD, LRESULT  *); 
BOOL  BLDDlgMsgFilter (HWND, UINT,WPARAM, LPARAM, int, DWORD,  BOOL  *); 
BOOL  BLDAddClientDlg (HWND, DLGPROC)  ; 

BOOL  BLDRemoveClientDlg (HWND)  ; 

BOOL  BLDIsClientDlgDialogMessage (MSG  *); 

BOOL  BLDDrawItem(HWND, LPDRAWITEMSTRUCT) ; 

BOOL  BLDBitmapToScreen (HDC, char  *, int, int, int, int, DWORD, BOOL) ; 


void  BLDMoveDlgClientDef (HWND, HWND) ; 

int  BLDDisplayMessageDef (HWND, UINT, char  *,int); 

BOOL  BLDDrawBitmapDef (LPDRAWITEMSTRUCT, char  *,BOOL); 

BOOL  BLDDrawIconDef (LPDRAWITEMSTRUCT, char  *); 
void  BLDMoveWindowDef (HWND, int , int , int , int, BOOL) ; 

BOOLBLDSendMDIMessageDef(HWND,UINT); 

BOOL  BLDDrawBkgndIconDef (HWND, PAINTSTRUCT  *,char  *,int); 

BOOL  BLDDrawBkgndBitmapDef (HWND, PAINTSTRUCT  *,char  *, int , BOOL, BOOL) ; 

BOOL  BLDDrawAutoStateDef (LPDRAWITEMSTRUCT, char  *, BOOL, BOOL) ; 

BOOL  BLDDrawStateBitmapDef (LPDRAWITEMSTRUCT, char  *,char  *,char  *,char  *,BOOL)/ 

BOOL  BLDDrawStatelconDef (LPDRAWITEMSTRUCT, char  *,char  *,char  *,char  *); 

void  BLDGetDlgScrolledDef (HWND, int  *,int  *); 

void  BLDSetDlgScrolledDef (HWND, int , int ) ; 

void  BLDFindCtrlsRightBottomDef (HWND, int  *,int  *); 

void  BLDCalcScrollRangesDef (HWND, int  *,int  * , int , int , int, int) ; 

BOOL  BLDScrollDlgDef (HWND, UINT, int, int, int, int, int, int,  int, int, BOOL)  ; 

BOOL  BLDExitScrollDlgDef (HWND) ; 

BOOL  BLDSizeDlgDef (HWND, int , int ) ; 

HWND  BLDCreateClientDlgDef  (Char  *, HWND, UINT, DLGPROC, int , BOOL) ; 

LRESULT  BLDSizeToolBarsDef (HWND, UINT, int, int, int, BOOL) ; 
void  BLDCalcToolbarFrameDef  (HWND,  int  *,int  *,int  *^,int  *); 
void  BLDSetClientFocusDef  (HWND  hWnd) ; 
void  BLDClientMoveDef (HWND  hWnd) ; 

BOOL  BLDInitCtrlFontDef (HWND, int , int , int,  int,  int,  int,  BYTE,  BYTE,  BYTE,  BYTE,  BYTE, 
TE,  BYTE,  BYTE,  char  *); 

BOOL  BLDExitCtrlFontDef (HWND, int) ; 

BOOL  BLDInitSolidBrushDef (HWND, COLORREF) ; 

BOOL  BLDInitPatternBrushDef (HWND, char  *); 

BOOL  BLDExitBrushDef (HWND) ; 

HBRUSH  BLDCtlColorStockBrushDef (HWND, int) ; 

HBRUSH  BLDCtlColorPropBrushDef (HWND) ; 

HBRUSH  BLDCtlColorDefaultBrushDef (HWND) ; 

HBRUSH  BLDCtlColorBrushSetOrgDef (HWND, HDC) ; 

BOOL  BLDCheckFlHelpKeyDef (BOOL) ; 
void  BLDHelpTranslationDef (MSG  *); 
void  BLDShowHelpDef (HWND, UINT, DWORD) ; 

BOOL  BLDHelpFilterDef (HWND, UINT, WPARAM, LPARAM, DWORD, LPARAM  *,BOOL) ; 

LRESULT  BLDDefWindowProcMsgDef (HWND, UINT, WPARAM, LPARAM) ; 

BOOL  BLDAddClientDlgDef (HWND, DLGPROC) ; 
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BOOL  BLDRemoveClientDlgDef (HWND) ; 

BOOL  BLDIsClientDlgDialogMessageDef (MSG  *); 

HWND  BLDCreateClientCont rolsDef  (char  *,DLGPROC); 

BOOL  BLDDrawItemDef (HWND, LPDRAWITEMSTRUCT) ; 
static  BOOL  BLDMoveTo (HDC, int , int ) ; 

static  BOOL  BLDDrawFrame (HDC, int , int, int , int , BOOL) ; 

BOOL  BLDBitmapToScreenDef (HDC, char  *, int, int, int, int, DWORD, BOOL) ; 

HBRUSH  BLDGetGlobalBrushDef  (HWND  hCtrl,HDC  hDC) ; 

int  BLD_QUERYDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  iParam) ; 
int  BLD_QUERYDlgFuncDef (HWND  hWnd,char  *s2DlgName) ; 

BOOL  CALLBACK  BLD_QUERYDlgProc (HWND  hDlg, UINT  message, WPARAM  wP a ram, LPARAM  IParam); 

BOOL  BLD_QUERYDlgDefault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

HWND  BLD_MAINClFunc (HWND  hWnd, UINT  message, WPARAM  wParam, LPARAM  IParam); 

HWND  BLD_MAINClFuncDef (HWND  hWnd,char  *szDlgName, UINT  message); 

BOOL  CALLBACK  BLD_MAINC1P roc (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_MAINDlgDefault (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_PrintDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_PrintDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_PrintDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_PrintDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_OKDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_OKDlgFuncDef (HWND  hWnd,char  ^szDlgName) ; 

BOOL  CALLBACK  BLD_OKDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_OKDlgDefault (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_Applicat ionAppInit (HINSTANCE  hinst , HINSTANCE  hPrev, int  *pCmdShow, LPSTR  IpCmd) ; 
int  BLD_FunctionDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_FunctionDlgFuncDef  (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_FunctionDlgP roc (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_FunctionDlgDef ault (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_Function2DlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_Function2DlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_Function2DlgProc (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_Function2DlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_Function6DlgFunc (HWND  hWnd, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_Function6DlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_Function6DlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_Function6DlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_QuitFuncUDCFunc (HWND  hWnd, UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_HeaderDetailDigFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_Head€rDetailDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_HeaderDetailDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_HeaderDetailDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_EmployeeDetailDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_EmployeeDetailDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_EmployeeDetailDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam 

) ; 

BOOL  BLD_EmployeeDetailDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_BrowseReportDlgFunc (HWND  hWnd,UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_BrowseReportDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_BrowseReportDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_BrowseReportDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_ReportStatist icsDlgFunc (HWND  hWnd, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_ReportStatisticsDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_ReportStatisticsDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  iPar 
am)  ; 

BOOL  BLD_ReportStatisticsDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_ReportDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_ReportDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  ELD_ReportDlgP roc (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_ReportDlgDef ault (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD  BrowseEntryDlgFunc  (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_BrowseEntryDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  3LD_BrowseEntryDlgProc (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 
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BOOL  BLD_BrowseEnt ryDlgDef ault  (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) ; 
int  BLD_ReportTotalsDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  IParam); 
int  BLD_ReportTotaisDlgFuncDef  (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_ReportTotalsDlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 
BOOL  BLD_ReportTotalsDlgDef ault (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_EINErrDlgFunc (HWND  hWnd, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_EINErrDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_EINErrDlgProc (HWND  hDlg,UINT  message , WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_EINErrDlgDef ault (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_QueryMessageDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_QueryMessageDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_QueryMessageDlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 
BOOL  BLD_QueryMessageDlgDef ault (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_NMSGDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_NMSGDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_NMSGDlgP roc (HWND  hDlg,UINT  message , WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_NMSGDlgDefault (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_QueryErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_QueryErrDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_QueryErrDlgProc ( HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_QueryErrDlgDef ault (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_Blan)cetErrDlgFunc (HWND  hWnd, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_BlanketErrDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_BlanketErrDlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_BlanketErrDlgDefault (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_PWErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_PWErrDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_PWErrDlgP roc  (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_PWErrDlgDefault (HWND  hDlg,UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_Year_ErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 

'int  BLD_Year_ErrDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_Year_ErrDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_Year_ErrDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_SysErrDlgFunc ( HWND  hWnd,UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_SysErrDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_SysErrDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_SysErrDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_BlankErrDlgFunc (HWND  hWnd, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_BlankErrDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_BlankEr rDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_BlankErrDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_MissingFileDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_MissingFileDlgFuncDef  (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_MissingFileDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_MissingFileDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_QueryTxtDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_QueryTxtDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_QueryTxtDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_QueryTxtDlgDef ault (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_ErrorFileDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_ErrorFileDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_ErrorFileDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_ErrorFileDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_NULLPtrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_NULLPtrDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_NULLPt rDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_NULLPtrDlgDef ault (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_DataErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_DataErrDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_DataErrDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_DataErrDlgDef ault ( HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_DFileErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_DFileErrDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_DFileErrDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
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BOOL  BLD_DFileErrDlgDef ault  (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) ; 
int  BLD_NoMoreMatchesDlgFunc (HWND  hWnd,UINT  message, WPARAM  wP a ram, LPARAM  IParam); 
int  BLD_NoMoreMatchesDlgFuncDef (HWND  hWnd,char  *S2DlgName) ; 

BOOL  CALLBACK  BLD_NoMoreMatchesDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam) 

BOOL  BLD_NoMoreMatchesDlgDef ault  (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_SequenceDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_SequenceDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_SequenceDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_SequenceDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_MRNErrDlgFunc ( HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_MRNErrDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_MRNErrDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_MRNErrDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_MatchErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_MatchErrDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_MatchErrDlgProc (HWND  hDlg, UINT  message , WPARAM  wParam, LPAEIAM  IParam); 

BOOL  BLD_MatchErrDlgDefault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_PrintBlanketDlgFunc (HWND  hWnd,UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_PrintBlanl<.etDlgFuncDef  (HWND  hWnd,char  *szDlgName)  ; 

BOOL  CALLBACK  BLD_PrintBlanketDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_PrintBlanketDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_PrintEmpDetailDlgFunc  (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_PrintEmpDetailDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_PrintEmpDetaiiDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam 

) ; 

BOOL  BLD_PrintEmpDetailDlgDef ault ( HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_PrintHeaderDetailDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_PrintHeaderDetailDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_PrintHeaderDetailDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IPa 
ram)  ; 

BOOL  BLD_PrintHeaderDetailDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_Function5DlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_Function5DlgFuncDef (HWND  hWnd,char  *szDlgName); 

BOOL  CALLBACK  BLD_Function5DlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_Function5DlgDef ault ( HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_TotNowPrintDlgFunc (HWND  hWnd, UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_TotNowPrintDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_TotNowPrintDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_TotNowPrintDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_GetNumCopyDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_GetNumCopyDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_GetNumCopyDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_GetNumCopyDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_qparamDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_qparamDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_qparamDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_qparamDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_EINorSeqErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_EINorSeqErrDlgFuncDef (HWND  hWnd, char  *szDlgName)  ; 

BOOL  CALLBACK  BLD_EINorSeqErrDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_EINorSeqErrDlgDefault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_SeqErrDlgFunc (HWND  hWnd,UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_SeqErrDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_SeqErrDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_SeqErrDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_HFileDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_HFileDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_HFileDlgProc (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_HFileDlgDef ault (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 
int  BLD_UserNumErrDlgFunc (HWND  hWnd,UINT  message , WPARA.M  wParam, LPARAM  IParam); 
int  BLD_UserNumErrDlgFuncDef ( HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_UserNumErrDlgProc (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_UserNumErrDlgDef ault ( HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
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int  BLD_questDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  IParam) ; 
int  BLD_questDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_questDlgProc (HWND  hDlg, UINT  message , WPARAM  wParam, LPARAM  IParam); 

BOOL  BLD_questDlgDe fault (HWND  hDlg, UINT  message, WPARAM  wPa ram, LPARAM  IParam); 
int  BLD_StatOpenDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_StatOpenDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_StatOpenDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_StatOpenDlgDefault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_StatEmptyDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_StatEmptyDlgFuncDef (HWND  hWnd,char  *szDlgName) ; 

BOOL  CALLBACK  BLD_StatEmptyDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_StatEmptyDlgDef ault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_StatWOpenDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_StatWOpenDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_StatWOpenDlgProc ( HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
BOOL  BLD_StatWOpenDlgDefault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_StatWriteErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam); 
int  BLD_StatWriteErrDlgFuncDef (HWND  hWnd, char  *szDlgName) ; 

BOOL  CALLBACK  BLD_StatWriteErrDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam) 
BOOL  BLD_StatWriteErrDlgDefault (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam); 

#endif 


j I ***************************************************************** 

//  ERROR  MESSAGE  HANDLING  (Definitions  can  be  overruled.) 

j j *************************************************************** 

tifndef  BLDMAINCAPTION 

#define  BLDMAINCAPTION  "EAMATE  V4.2" 

#endif 

#ifndef  BLDLOADERROR 

tdefine  BLDLOADERROR  "Cannot  load  string." 

#endif 


//  WindowsMAKER  color  definitions 


#def ine 
#def ine 
#def ine 
#define 


BLD_BLACK 
BLD_WHITE 
BLD_GRAY 
BLD  LTGRAY 


OXOOOOOOOOL 

OXOOFFFFFFL 

OX007F7F7FL 

OXOOCOCOCOL 


//  WindowsMAKER  definitions 


#define  BLD  MAXPATH  256 


//  WindowsMAKER  global  dialog  box  properties 


#def ine 
tdefine 
tdefine 
tdefine 
tdefine 
tdefine 
tdefine 


BLDGRAY_DIALOGBOX 

BLDGRAY_BUTTON 

BLDGRAY_COMBOBOX 

BLDGRAY_LISTBOX 

BLDGRAY_EDIT 

BLDGRAY_SCROLLBAR 

BLDGRAY  TEXT 


OxOOOOOOOlL 

Ox00000002L 

0x00000004L 

OxOOOOOOOSL 

OxOOOOOOlOL 

0x00000020L 

Ox00000040L 
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/**  Global. h **/ 

/**  by  Laura  L.  Downey  **/ 

/**  10/13/92  **/ 

/**  This  file  defines  global  variables  to  be  used  by  the  eamate  **/ 

/**  prototype  custom  code;  to  be  included  in  usercode.c  **/ 

/**  all  variables  included  here  are  defined  e:-:ternally  in  globall.h  **/ 


/ * * 

Info 

from 

Query 

Dialog  Box  ** 

/ 

: QYear [5] , 

/ * * 

user 

input 

from 

child  window 

IDMF_ 

_Qyear  **/ 

QEIN[11] , 

/ * * 

user 

input 

from 

child  window 

idmf' 

_QEIN  **/ 

QEstab [5] , 

j -k  -K 

user 

input 

from 

child  window 

IDMF^ 

_QEstab  **/ 

LName [16], 

! -k  -k 

user 

input 

from 

child  window 

idmf' 

_LName  **/ 

FName [13], 

/ ★ * 

user 

input 

from 

child  window 

IDMF^ 

_FName  **/ 

QSSN[12] , 

j -k  -k 

user 

input 

from 

child  window 

IDMF^ 

_QSSN  **/ 

j k k 

Info 

from 

NewBrowse  Dialog  Box  ** 

/ 

BrYear  [5] , 

! kk 

user 

input 

from 

child  window 

IDMF_ 

_BrYear  **/ 

BrEIN[ll] , 

j k k 

user 

input 

from 

child  window 

IDMF^ 

_BrEIN  **/ 

BrEstab [ 5] , 

! k k 

user 

input 

from 

child  window 

IDMF^ 

_BrEstab  **/ 

BrStart [ 12 ] , 

! k k 

user 

input 

from 

child  window 

idmf' 

_BrStart  **/ 

j kk 

Info 

f rom 

Print 

Dialog  Box  ** 

/ 

PW[10] , 

/ k k 

user 

input 

from 

child  window 

IDMF_ 

_Password  **/ 

PYear [5] , 

^ k k 

user 

input 

from 

child  window 

IDMF^ 

_PYear  **/ 

PEIN[11] , 

j k k 

user 

input 

from 

child  window 

idmf' 

_PEIN  **/ 

PEstab [5] , 

j k k 

user 

input 

from 

child  window 

IDMF^ 

_PEstab  **/ 

PSeq[4] , 

J k k 

user 

input 

from 

child  window 

IDMF^ 

_PSeq  **/ 

J k k 

Info 

from 

Report 

. Dialog  Box  **/ 

RYear [5] , 

/ k k 

user 

input 

from 

child  window 

IDMF_ 

_RYear  **/ 

REIN[11] , 

J k k 

user 

input 

from 

child  window 

IDMF^ 

_REIN  **/ 

REstab [5] , 

j k k 

user 

input 

f rom 

child  window 

IDMF^ 

_REstab  **/ 

! k k 

Info 

from 

NCopy 

Dialog  Bo:<  ** 

/ 

cnum[6] ; 

! k k 

user 

input 

f rom 

child  window 

IDMF_ 

_NumCopies  **/ 

of f count ; 

! k k 

# of 

browse  offsets  or  records  that  have  been  read 

USER; 

! k k 

user 

number,  read  from  file  usernum.fil  **/ 

r int  error; 

! k k 

used 

for  debugging  purposes  **/ 

char  sequence [4]; 


/**  holds  sequence  number  of  employer  report  **/ 
/**  may  be  input  from  child  window  IDMF_SeqNo  **/ 


/************************  STRING  VARIABLES  ********* ’'^  ************************************  / 


added  7/15/92  - holds  shortened  employer  header 
string  for  display  **/ 

added  7/15/92  - holds  detailed  employer  header 
info  for  display  **/ 

added  7/15/92  - hold  detailed  employer  header 
info  to  be  sent  to  printer  **/ 
added  7/15/92  - holds  detailed  employee  info 
to  be  sent  to  printer  **/ 


char 

EDetailSt ring [ 7 00 ] ; 

/* 

y **/ 

char 

Headerstring [300] ; 

/* 

char 

HDetailSt ring [400] ; 

/* 

char 

PHDetailSt ring [ 4 0 0 ] ; 

/* 

char 

PEDetailSt ring [ 70 0 ] ; 

/* 

char 

Totalstring [ 7 0 0 ] ; 

/* 

char 

PTotalSt ring [ 7 0 0 ] ; 

/* 

char 

PrintTotString[700 ] ; 

/* 

char 

PrintEDetail [1100] ; 

/* 

and  report  totals  to  be  sent  to  printer  **/ 
added  8/21/92  - holds  title,  header  detail  i 
and  employee  detail  for  printing  **/ 
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/***********************★  STRUCTURE  VARIABLES  ******************************************/ 


Struct  W2EmpInfo  Blanket  [30]; 


/**  added  11/30/92  by  LLD  to  hold  blanket  records  **/ 


struct  W2Browse  Browse; 


/**  added  11/16/92  by  LLD  to  hold  employee  browse 
info  to  be  displayed  in  listboxes  **/ 


struct  W2EmpInfo  EDetail; 


/**  added  11/16/92  by  LLD  to  hold  dummy  employee 
detail  data  **/ 


struct  W2Em.prInfo  CurrEmprInf o; 


/**  added  9/30/92  by  LLD  **/ 

/**  holds  empr  header,  final  totals,  **/ 

/**  and  cumein  (if  it  exists)  re  current  **/ 
/**  employer  being  searched  **/ 

/**  explicity  defined  in  global. h which  is  **/ 
/**  included  in  usercode.c  **/ 


/**  separatorstring  used  when  printing  blanket  report  to  separate  employee  records 
char  separatorstring  []  ="\n 


■\n"; 


* * / 
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/**  Globall.h  **/ 

/**  by  Laura  L.  Downey  **/ 

/**  10/13/92  **/ 

/**  This  file  defines  global  variables  listed  in  global. h and  main.h 
as  external;  to  be  used  by  the  eamate  prototype  custom  code  **/ 


J -k  * 

extern  char  QYear[5],  /** 

QEINCll],  /** 

QEstab[5],  /** 

LName [16],  / * * 

FName[13],  /** 

QSSN[12],  /** 

/ * * 

BrYear[5],  /** 

BrEIN[ll],  /** 

BrEstab[5],  /** 

BrStart[12],  /** 

! k k 

PW[10],  /** 

PYear[5],  /** 

PEIN[11],  /** 

PEstab[5],  /** 

PSeq [ 4 ] , / * * 

j k k 

RYear [5]  , ■ /** 

REIN[11],  /** 

REstab[5],  /** 

/ k k 

cnum [ 6 ] ; / * * 

/ 

extern  int  off count;  /** 

read  **/ 

extern  int  USER;  /** 

extern  long  int  error;  /** 

extern  char  sequence [4];  /** 

j k k 


Info 

from 

Query 

Dialog  Box  ** 

/ 

user 

input 

f rom 

child 

window 

IDMF_ 

_Qyear  **/ 

user 

input 

from 

child 

window 

idmf' 

_QEIN  **/ 

user 

input 

from 

child 

window 

IDMF^ 

_QEstab  **/ 

user 

input 

from 

child 

window 

IDMF^ 

LName  **/ 

user 

input 

f rom 

child 

window 

IDMF^ 

FName  **/ 

user 

input 

from 

child 

window 

idmf' 

_QSSN  **/ 

Info 

from 

NewBrowse  Dialog  Box  ** 

/ 

user 

input 

from 

child 

window 

IDMF_ 

_BrYear  **/ 

user 

input 

from 

child 

window 

IDMF_ 

BrEIN  **/ 

user 

input 

from 

child 

window 

idmf' 

_BrEstab  **/ 

user 

input 

f rom 

child 

window 

IDMF^ 

_BrStart  **/ 

Info 

from 

Print 

Dialog  Box  ** 

/ 

user 

input 

f rom 

child 

window 

IDMF_ 

Password  ** 

user 

input 

f rom 

child 

window 

IDMF^ 

PYear  **/ 

user 

input 

from 

child 

window 

IDMF^ 

_PEIN  **/ 

user 

input 

from 

child 

window 

idmf' 

_PEstab  **/ 

user 

input 

f rom 

child 

window 

IDMF^ 

_PSeq  **/ 

Info 

f rom 

Report 

, Dialog  Box  **/ 

user 

input 

f rom 

child 

window 

IDMF_ 

_RYear  **/ 

user 

input 

f rom 

child 

window 

idmf' 

_REIN  **/ 

user 

input 

f rom 

child 

window 

IDMF^ 

_REstab  **/ 

Info 

from 

NCopy 

Dialig  Box  ** 

/ 

user 

input 

from 

child 

window 

IDMF_ 

NumCopies  * 

# of 

browse  offsets  or 

records  that 

have  been 

user 

number,  read  from 

file  usernum. 

,fil  **/ 

used 

for  debugging  purposes**/ 

holds  sequence  number  of  employer  report  **/ 
may  be  input  from  child  window  IDMF_SeqNo  **/ 


^kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk 

/ 

extern 

char 

EDetailSt ring [ 70 0 ] ; 

extern 

r 

char 

Headerstring [300]  ; 

extern 

or 

char 

HDetailSt ring [4 00 ] ; 

extern 

char 

PHDet ailSt ring [ 4 00 ] ; 

extern 

o be 

char 

PEDetailString[700] ; 

extern 

k k j 

char 

Totalstring [700] ; 

extern 

char 

PTotalSt ring [ 700 ] ; 

STRING  VARIABLES  ********************************* 


/**added  7/6/92  - hold  employee  detail  string**/ 
/**  added  7/15/92  - holds  shortened  employer  heade 


j k k 

j k k 
j k k 


J k k 


j k k 


info  for  display**/ 

added  1/Ibl9i2  - holds  detailed  employee  info  f 


display*  * / 
added  H lb  1 92  - 
info  to  be  sent 
added  7/15/92  - 


holds  detailed 
to  printer  **/ 
holds  detailed 


employer  header 
employee  info  t 


sent  to  printer  **/ 

added  8/19/92  - holds  totals  info  for  display 


added  8/19/92  - holds  totals  info  for  printing 
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* * / 

extern  char  PrintTot St ring [700 ] ; 
extern  char  PrintEDetail [ 1 1 0 0 ] ; 


/**  added  8/21/92  - holds  title,  header  detail  and 
report  totals  for  printing  **/ 

/**  added  8/21/92  - holds  title,  header  detail  and 
emploee  detail  for  printing  **/ 


/******************************  CREDITS  IN  MAIN  WINDOW  VARIABLES  ************************* 
* * / 

extern  FARPROC  IpProc;  /**  added  6/15/92  by  LLD  for  use  in  **/ 

extern  HWND  AbouthWnd;  /**  displaying  credits  in  main  window  **/ 

/**  used  in  eamate.c  WINMAIN  procedure  **/ 

/**  explicitly  declared  in  main.h  which  is  **/ 

/**  included  in  eamate.c  **/ 

/*******************************  STRUCTURE  VARIABLES  ***********************************/ 


extern 

* * / 

struct 

W2EmpInf o 

Blanket [ 30 ] ; 

/ * * 

added  11/30 

extern 

struct 

W2Browse 

Browse; 

* * 

added  11/1 
info  t 

extern 

struct 

W2EmpInf o 

EDetail ; 

y * * 

added  11/16 
detail  dat 

extern 

struct 

W2EmprInf 

c CurrEmprInf 0/ 

/ * *■ 

added  9/30/ 

/**  holds  empr  header,  final  totals,  **/ 

/**  and  cumein  (if  it  exists)  re  current  **/ 
/**  employer  being  searched  **/ 

/**  explicity  defined  in  global. h which  is  **/ 
/**  included  in  usercode . c .-**/ 


extern  char  separatorstring  [77]; 


/**  used  to  separate  employee  records  when 
blanket  report  is  printed  **/ 


/************* ********USER-DEFINED 
void  CopyBlanket_EDet ail ( int ) ; 

92  ** / 


FUNCTIONS*********************************************/ 
/**  copies  current  blanket  detail  into  EDetail 
so  CreateEDetail ( ) can  be  utilized  - added  11/30/ 


void  CreateHeaderSt ring (void) ; 

void  CreateHDetailSt ring (void) ; 

void  CreateEDetail (void) ; 
from 

void  CreateTotalSt ring (void) ; 
r 

void  CreatePrintTotSt ring (void) ; 
Is  **/ 


/**  creates  browse  empr  header  info  **/ 

/**  added  6/19/92  by  LLD  **/ 

/**  added  07/01/92  by  LLD  - creates  header  detail 
display  string  & print  string**/ 

/**  added  7/6/92  by  LLD  - creates  a detail  string 

list  box  selection  if  nothing  entered  by  user 
for  display  and  a print  string**/ 

/**  added  8/19/92  by  LLD  - creates  total  string  fo 

display  and  printing  **/ 

/**  added  8/21/92  by  LLD  - concatenates  title, 

empr  header,  separator  string,  and  report  tota 


/**  added  8/21/92  by  LLD  - concatenates  title, 
empr  header,  & separator  string,  and 
employee  detail  **/ 


void  CreatePrintEDetail (void) ; 
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/**  NOTE:  detail  strings  and  print  detail  strings  were  created  because  the  tabs  on 


the  screen  are  different  than  the  tabs  on 

the  printer  (printer  is  a mono  font)  **/ 

void  CreateTitlePage (char [ ] ) ; 

/**  added  7/17/92  by  LLD  - creates  title  p 

age  string 

for  blanlcet  report  **/ 

void  fill  aggregate (void) ; 

//added  12/6/93  by  LLD,  fills  ex_stat  aggr 

egate 

/ /structure 

void  fill_current (void) ; 
ent 

//added  12/6/93  by  LLD,  fills  in_stat  curr 

/ /structure 

void  init_aggregate (HWND, UINT, WPARAM, LONG) ; 
t 

//added  12/6/93  by  LLD,  initializes  ex_sta 

oxes 

//aggregate  structure  and  displays  error  b 

//when  appropriate 

void  init_current (void) ; 

//added  12/6/93  by  LLD,  initializes  in_sta 

t 

//current  structure  with  all  zeroes 


void  write_aggregate ( HWND, UINT, WPARAM, LONG) ; 

//added  12/6/93  by  LLD,  writes  aggregate 
//structure  to  stat#.fil 

BOOL  FAR  PASCAL  AbortProc  (HDC,  short); 
ion 

//abort  message  function  for  print  protect 

HDC  GetPrinterDC (void) ; 
device 

/**  added  7/13/92  by  LLD  - creates  printer 

context  ’'*/ 

main. h 
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/**  MAIN.H  **/ 

/**  6/16/92  **/ 

/**  by  Laura  L.  Downey  **/ 

/**  to  be  included  in  eamate.c  **/ 

/**  defines  variables  to  be  used  to  insert  credits  in  client  **/ 
/**  area  of  main  window  in  eamate  prototype  **/ 

/**  these  are  defined  externally  in  globall.h**/ 

FARPROC  IpProc; 

HWND  AbouthWnd; 


mfedit.h  Wed  Mar  2 14:14:05  1994  1 

//  defined  MAX  values  used  by  Magic  Fields 
#define  MFMAXPATH  140 

#define  MFMAXCLASS  20 

# define  MFMAXNAME  14 

tdefine  MFMAXPICTURE  80 


/**************★*******■**:»*■*•***■»******»*★******■»:*■»:**■***■***■************■*■***/ 
/*  DIALOG  BOX  PROPERTIES  USED  BY  Magic  Fields  */ 

/******'*********'*-****'**'**************Kr*****************-******************'*/ 


tdefine  MFCTRL_MFEDIT  0 

tdefine  MFCTRL_COMBOBOX  1 

tdefine  MFCTRL_EDIT  2 

tdefine  MFCTRL_LISTBOX  3 

tdefine  MFCTRL_SCROLLBAR  4 

tdefine  MFCTRL_STATIC  5 

tdefine  MFCTRL_GRAYFRAME  6 

tdefine  MFCTRL_BUTTON  7 

tdefine  MFCTRL_PUSKBUTTGN  8 

tdefine  MFCTRL_GR0UP30X  9 

tdefine  MFCTRL_RADIOBUTTON  10 

tdefine  MFCTRL_CHECK3GX  11 

tdefine  MFCTRL_MAX  20 

tdefine  MFCBIT_GRAYCONTROL  0:<0001 

tdefine  MFCBIT_NEXTLOOKUP  0;-:0  0 02 

tdefine  MFCBIT_NEXTLOOKDOVJN  0:-:0004 

tdefine  MFCBIT_DLGF1KELP  0x0001 

tdefine  MFCBIT  DLGNEXTLOOK  0x0002 


/*******************x-**3c*x'x*-**7r^*********xx**:^*****'>c*'»r:«rx***x**x***********/ 

/*  DATA  TYPES  i STRUCTURES  USED  BY  Magic  Fields  */ 

/*-*************XX*XX*-***XXX*X***X*X*XXXXXxXx*xXX*XX*xX*X*XXXXXX*******'**'**/ 


typedef 

struct  tagMFDATE 
; 

int 

\ 

iYear ; 

int 

iMonth; 

int 

iDay  ; 

} MFDATE ; 

typedef 

MFDATE  far  *LPMFDA' 

typedef 

struct  tagMFTIME 
; 

int 

\ 

iHour ; 

int 

iMinute ; 

int 

iSecond; 

} MET I ME; 

typedef 

MFTIME  far  *LPMFTI1 

typedef 

Struct  tagMFNUMBER 
{ 

bNeg; 

BOOL 

long 

INurricer; 

int 

iDecInit Zeros  ; 

long 

IDecimal; 

}MFNUMBER; 

typedef 

MFNUMBER  far  *LPMF1 

*LPMFNUM5ER; 
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typedef  struct  tagMFDLLINFO 

{ 

int  iVersion; 

BOOL  bRuntime; 

char  szPath [MFMAXPATH+1] ; 

char  szClass [MFMAXCLASS+1 ] ; 

}MFDLLINFO; 

typedef  MFDLLINFO  far  * LPMFDLLINFO; 

typedef  struct  tagMFFIELDINFO 

{ 

int  iFieldType; 

char  szValidat ionName [MFMAXNAME+1 ] ; 
char  s z Co lorName [MFMAXNAME+1 ] ; 

char  szHelpName [MFMAXNAME+1 ] ; 

char  szPicture [MFMAXPICTURE+1] ; 

BOOL  bRangeChecking; 

BOOL  bTemplateValues ; 

BOOL  bGlobalErrorHandling; 

BOOL  bGlobalInputMode; 

BOOL  bGlobalCustcmP recessing; 

BOOL  bGlobalColor  ; 

char  szSetupFile [MFMAXPATH+1 ] ; 

}MFFIELDINFO; 

typedef  MFFIELDINFO  far  *LPMFFIELDIMFO; 


typedef  struct  tagMFNOTIFICATION 
{ 


HWND 

hField; 

WORD 

message; 

WORD 

wParam; 

LONG 

iParam; 

DWORD 

dwReturn ; 

BOOL 

bProcessed; 

WORD 

wValidat ionType  ; 

WORD 

wVali da tion Status; 

}MFNOTIFICATICN; 

typedef  MFNOTIFICATION  far  *LPMFNOTIFICATION; 

typedef  struct  tagMFDLGPROPERTY 

( 

DWORD  dwSetup; 

DWORD  dwControl [MFCTRL_MAX] ; 
}MFDLGPROPERTY; 

typedef  MFDLGPROPERTY  far  *LPMFDLGPROPERTY; 


/**■*****★*************#********************************************■*******/ 
/*  NOTIFICATION  MESSAGES  FROM  Magic  Fields  */ 

/*********■*■*********■**■>?***•****************•*•***■****************************/ 


#define  MFD_NOTIFY  WM_USER+333 

//  SUB  MESSAGES 

#define  MFN_TESTMODE  1 

tdefine  MFN_ONLIMEHELP  2 

#define  MFN_MEMUHELP  3 

tdefine  MFN_VALIDATE  10 

tdefine  MFN_POSTVALIDATE  11 

tdefine  MFN  PROCESSMESSAGE  20 
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#define  MFN_PRCCESSHELP  21 

#define  MEN  PROCESSERROR  22 


/**************•**********★***■*:*■********■*****■********* 
/*  FORMAT  TYPES  used  by  Magic  Fields 
/********•**********•***********•*■*•********■*********•**■*•* 


#define  MFTYPE_Custom  0 
#define  MFTYPE_Date  1 
#define  MFTYPE_Time  2 
#define  MFTYPE_Currency  3 
#define  MFTYPE_Number  4 
tdefine  MFTYPE_Integer  5 


y^***7t*-*************'****:*f-:*r*****x*********:*r**'********'** 

/*  VALIDATION  TYPES  used  by  Magic  Fields 


tdefine  VTYPE_F2 
tdefine  VTYPE_FOCUS 
tdefine  VTYPE_SPECIAL 
tdefine  VTYPE_MESSAGE 
tdefine  VTYPE_CR 
tdefine  VTYPE_CHAR 
tdefine  VTYPE  SETTEXT 


4 

5 


/******************'*********************'*'!i:**xx******* 

/*  ERROR  RETURNS 'used  BY  Magic  Fields 

/*******-*'************'****-**x*X*****-*'**xx-*X***x******* 

//  ERRORS  BELOW  100  is  internal  Magic  Fields  error 


//  ERROR  RETURNS  FOR  Magic  Fields  API  FUNCTIONS 


tdefine  MFERR_NOPARENTWINDOW  100 
tdefine  MFERR_NOFIELD  101 
tdefine  MFERR_NOTMFIELD  102 
tdefine  MFERR_ILLEGALFIELDTYFE  103 
tdefine  MFERR_SETTEXTSTOP?ED  104 
tdefine  MFERR_ILLEGALDATA  105 
tdefine  MFERR_NOTFIXEDSTRING  106 
tdefine  MFERR_TOOLONGNETSTRING  107 
tdefine  MFERR_TOOSHORTNETSTRING  108 
tdefine  MFERR_TOOSHORTSTRING  109 
tdefine  MFERR_TOOLOMGSTRING  110 

tdefine  MFERR_EMPTYFIELD  120 
tdefine  MFERR_OVERFLOW  121 
tdefine  MFERR  CHARAFTERNUMBER  122 


// 

// 


ERRORS  BETWEEN  200  and  999 

ERRORS  HIGHER  THAN  1000  is 


is  Magic  Fields  format 
Magic  Fields  validation 


//  COMMON  VALIDATION  ERRORS 

tdefine  VALERR_NOSYSTEMTIME  1000 
tdefine  VALERR_NEEDMORE  1001 
tdefine  VALERR_ILLEGALSEPAPA.TCR  10  02 
tdefine  VALERR_PICTUREENDSTRING  1003 
tdefine  VALERR_PICTUREENDCHAR  1004 
tdefine  VALERR  CHARACTER  1005 


********************* ! 

*/ 

*********************  j 


*********************  j 

*/ 


★ *■****★***■*****:*:**■***  j 

* / 

*********************  j 


errors 


errors 
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#define  VALERR_REFORMATERROR  1006 

#define  VALERR_STRING  1007 

#define  VALERR_EMPTYFIELD  1008 

#define  VALERR_ILLEGALFORMAT  1009 

//  DATE  VALIDATION  ERRORS 

#define  VALERR_ILLEGALDAY  1050 

fdefine  VALERR_ILLEGALMONTH  1051 

#define  VALERR_ILLEGALYEAR  1052 

//  TIME  VALIDATION  ERRORS 

#define  VALERR_ILLEGALHOUR  1060 

#define  VALERR_ILLEGALMINUTE  1061 

#define  VALERR_ILLEGALSECOND  1062 

tdefine  VALERR_ILLEGALAMPM  1063 

//  VALUE  ERRORS  - ILLEGAL  & OUT  RANGE  ERRORS 
#define  VALERR_ILLEGALDATE  1100 

#define  VALERR_SMALLDATE  1101 

#define  VALERR_LARGEDATE  1102 

#define  VALERR_ILLEGALTIME  1110 

#define  VALERR_SMALLTIME  1111 

#define  VALERR_LARGETIME  1112 

#defin€  VALERR_ILLEGALCURRENCY  1120 

tdefine  VALERR_SMALLCURRENCY  1121 

#define  VALERR_LARGECURRENCY  1122 

#define  VALERR_ILLEGALNUMBER  1130 

tdefine  VALERR_SMALLNUMBER  1131 

#define  VALERR_LARGENUMBER  1132 

#define  VALERR_ILLEGALINTEGER  1140 

#define  VALERR_SMALLINTEGER  1141 

#define  VALERR_LARGEINTEGER  1142 

tdefine  VALERR_ILLEGALPICTURE  1150 

#define  VALERR_SMALLPICTURE  1151 

#define  VALERR_LARGEPICTURE  1152 

#define  VALERR_DECIMALOVERFLOW  1160 

#define  VALERR_NUMBEROVERFLOW  1161 

//  CUSTOM  ERRORS 

#define  VALERR_CUSTOMFIRST  1200 

tdefine  VALERR  CUSTOMLAST  1299 


/**************************  ■*-*******'x***x-»r**x********'**  •********************/ 

/*  LIBRARY  API  FUNCTIONS  IN  Magic  Fields  */ 

/**************’******X****X*****X**X**X*****X*****************************/ 


#ifdef  cplusplus 

extern  "C"  { 

#endif 


WORD 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

Mf InitMFEDIT (void)  ; 

MfGetDLLInfo (LPMFDLLINFO  Ipinfo) ; 

MfSetSetupFile (HANDLE  hIn3t,LPSTR  ipPath) ; 

Mf IsMagicMessage (HNND  hDlg, unsigned  message, WORD  wParam,LONG 
MfSetDlgBoxProperty (HWND  hDlg, LPMFDLGPROPERTY  IpFrame) ; 

MfGetCurrentDate (LPMFDATE  IpDate) ; 


IParam) 
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BOOL  FAR  PASCAL  Mf GetCurrentTime ( LPMFTIME  IpTime); 


BOOL  FAR  PASCAL  Mf I sDateLegaK LPMFDATE  IpDate) ; 

BOOL  FAR  PASCAL  MfIsTimeLegal ( LPMFTIME  IpTime); 

BOOL  FAR  PASCAL  Mf IsNumberLegal (LPMFNUMBER  IpNumber) ; 


int  FAR  PASCAL  MfCompa reDate ( LPMFDATE  IpDatel , LPMFDATE  lpDate2); 
int  FAR  PASCAL  MfCompareTime ( LPMFTIME  IpTimel , LPMFTIME  lpTime2); 
int  FAR  PASCAL  MfCompa reNumber { LPMFNUMBER  ipNuraberl , LPMFNUMBER  lpNumber2); 


BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

) ; 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

BOOL 

FAR 

PASCAL 

Mf IsLeapYear (int  iYear) ; 

MfDateToString (LPMFDATE  IpDate, LPSTR  lpStr,int  max); 

MfTimeToSt ring (LPMFTIME  IpTime, LPSTR  lpStr,int  max); 

MfCurrencyToString (LPMFNUMBER  IpNumber, LPSTR  lpStr,int  max) ; 
MfNumberToString (LPMFNUMBER  IpNumber, LPSTR  lpStr,int  max) ; 

MfIsFieldValid (HWND  hDlg, int  nField,LPINT  IpError); 

MfGetFieldInf o (HWND  hDlg, int  nField, LPMFFIELDINFO  lpInfo,LPINT  IpError) ; 

Mf GetFieldDate (HWND  hDlg, int  nField, LPMFDATE  IpDate, LPINT  IpError); 

Mf GetFieldTime ( HWND  hDlg, int  nField, LPMFTIME  IpTime, LPINT  IpError); 
MfGetFieldCurrency (HWND  hDlg, int  nField, LPMFNUMBER  IpNumber , LPINT  IpError) 

MfGetFieldNumber (HWND  hDlg, int  nField, LPMFNUMBER  IpNumber , LPINT  IpError); 
MfGetFieldLong (HWND  hDlg, int  nField, LPLONG  IpLong, LPINT  IpError); 
MfGetFieldNetSt ring (HWND  hDlg, int  nField, LPSTR  lpNet,int  max, LPINT  IpError 

Mf SetFieidDate (HVJND  hDlg, int  nField, LPMFDATE  IpDate, LPINT  IpError); 
MfSetFieldTime (HWND  hDlg, int  nField, LPMFTIME  IpTime, LPINT  IpError); 

Mf SetFieldCurrency (HWND  hDlg, int  nField, LPMFNUMBER  IpNumber , LPINT  IpError) 

Mf SetFieldNumber (HWND  hDlg, int  nField, LPMFNUMBER  IpNumber, LPINT  IpError); 
Mf SetFieldLong (HWND  hDlg, int  nField, LPLONG  IpLong, LPINT  IpError); 

Mf SetFieldNetString (HWND  hDlg, int  nField, LPSTR  IpNet, LPINT  IpError); 

Mf NumberToDouble ( LPMFNUMBER  IpNumiDer, double  far  *lpDouble) ; 

MfDoubleToNumbe r ( LPMFNUMBER  IpNumber , double  far  *lpDouble) ; 


#ifdef  cplusplus 

} 

#endif 
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/*******************  *STRUCT .H  file****************************/ 

/*******************-********^c********x************************/ 

//  This  file  contains  structure  definitions  for  EAMATE  data  used 
//  in  usercode.c  and  custom. c 

//  Revised  by  LLD  on  10/19/93  to  incorporate  sequence  number  and  new  query  parameters 


//  : 

Revised  by 

LLD  on  11/30/93  to 

incorporate  statistical  . 

/ * * 

Below  is  a 

list  of  abbreviations  that  are  used  in  the 

/ * * 

naming  of 

the  fields . If  an 

abbreviation  is  not  used 

/ * * 

the  full  term  appears  in  the 

field  name  **/ 

/******************************** 

*****************  y 

/ * * 

Add 

Address 

* * y 

/ * * 

Amt 

Amount 

* * y 

/ * * 

An 

Annuity 

* * y 

y * * 

Ann 

Annual 

* * y 

y * * 

Comp 

Compensation 

* * y 

y * * 

Corr 

Correct 

* * y 

y * * 

Def 

Deferred 

* * y 

y * * 

Diff 

Difference 

* * y 

y * * 

Dis 

District 

x * y 

y * * 

EIN 

Employee  Identifi 

cation  Number  **/ 

y * * 

Emplmt 

Employment 

* * y 

y * * 

Empr 

Employer 

* * y 

y * * 

Estab 

Established 

* * y 

y * * 

Fed 

Federal 

* * y 

y * * 

Grp 

Group 

* *'y 

y * * 

ID 

Identification 

* * y 

y * * 

Ind 

Indicator 

* * y 

y * * 

Ins 

Insurance 

* * y 

y * * 

Int 

Internal 

* * y 

y * * 

Liab 

Liability 

* * y 

y * * 

Lib 

Libra  ry 

* * y 

y * * 

Lim 

Limitation 

**y 

y * * 

Loc 

Local 

.*y 

y * * 

MRN 

Microfilm  Reference  Number  **/ 

y * * 

Neg 

Negative 

**y 

y * * 

Num 

Number 

* * y 

y * * 

Orig 

Original 

* * y 

y * * 

Pen 

Pension 

* * y 

y * * 

Proc 

Processed 

* * y 

y * * 

Rec 

Record 

* * y 

y * * 

Rep 

Reported 

* * y 

y * * 

Ret 

Retirement 

* * y 

y * * 

Rev 

Revenue 

* * y 

y * * 

Sec 

Security 

* * y 

y * * 

Soc 

Social 

* * y 

y * * 

SSN 

Social  Security  Number  **/ 

y * * 

St 

State 

* * y 

y * * 

Stat 

Statutory 

* * y 

y * * 

Tps 

Tips 

* * y 

y * * 

Trm 

Termi 

* * y 

y * * 

Unc 

Uncollected 

* * y 

y * * 

Wgs 

Wages 

* * y 

y * * 

Wheld 

Withheld 

* * y 

y*************************************************y 

#include  <time 

. h> 

■*/ 


/********■*******•*•*★***-*  *.rr.*rAr**:»*r*****.‘:***^:**  *********  •****■*•**■****■*■**/ 
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/**  This  define  section  was  used  when  test  data  v;as  built,  **/ 
/**  but  is  not  being  used  for  the  current  user  interface  **/ 

/**  It  may  be  used  in  the  future  to  differentiate  between  **/ 
/**  textual  data  and  image  data  when  employee  detail  info  **/ 
/**  is  displayed  **/ 


/**  thi: 

#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 


1 will  be 

the 

first 

byte 

in 

each  type  of  record  ** 

/ 

W2EH  0 

/ * * 

EAMATE 

W2  Empr  Header  Type  ** 

/ 

W2EI  1 

/ * -k 

EAMATE 

W2  Emp  Info  Type  **/ 

W2IT  2 

! k -k 

EAMATE 

W2  Intermed  Total  Type 

■k  -k  ! 

W2FT  3 

! k k 

EAMATE 

W2  Final  Total  Type  ** 

/ 

W2CE  4 

! k k 

EAMATE 

W2  Cum  EIN  Type  **/ 

W2CEH  5 

J k k 

EAMATE 

W2C  Empr  Header  Type  **/ 

W2CEI  6 

! k k 

EAMATE 

W2C  Emp  Info  Type  **/ 

W2CFT  7 

j k k 

EAMATE 

W2C  Final  Total  Type  **/ 

AWR_W2EH 

8 

j k k 

AWR 

W2 

Empr  Header  Type  **/ 

AWR_W2EI 

9 

j k k 

AWR 

W2 

Emp  Info  Type  **/ 

AWR_W2IT 

10 

! k k 

AWR 

W2 

Intermed  Total  Type  ** 

/ 

AWR_W2FT 

11 

! k k 

AWR 

W2 

Final  Total  Type  **/ 

AWR_W2CE 

12 

f k k 

AWR 

W2 

Cumulative  EIN  **/ 

AWR_W2CEH 

13 

/ k k 

AWR 

W2 

Empr  Header  Type  **/ 

AWR_W2CEI 

14 

j k k 

AWR 

W2 

Emp  Info  Type  **/ 

AWR  W2CFT 

15 

/ * '' 

AWR 

W2 

Final  Total  Type  **/ 

/*****************  Ejs-n  Qp  NON-USED  SECTION  *******★*****/ 


//NOTE: 

// 

// 

// 

// 

// 

// 


dummy  characters  are  used  to  compensate  for  byte  alignment  on  the  SUN, 
unsigned  char  of  4 is  used  in  this  file  where  long  is  used  on  the  SUN, 
the  byte  alignment  for  long  on  the  SUN  is  every  4 bytes,  therefore 
the  number  of  bytes  previous  to  an  unsigned  char  of  4 in  this  file 
must  be  a multiple  of  4 - i.e.  before  platter_side  below,  a total  of 
208  bytes  (including  one  dummy  byte)  are  present  before  the  structure 
member  platter_side 


/**NOTE:  ALL  DOLLAR  VALUES  INCLUDE  THE  DECIMAL**/ 


Struct  W2EmprInfo  f 
ture 
/ 

/**  empr  header  info  **/ 
char  EIN [11] ; 
char  Est abNumJoe r [ 5 ] ; 
char  ReportYea r [ 5 ] ; 
char  ProcessYear [ 5 ] ; 
char  TapeLibNum [ 7 ] ; 
char  TypeEm.pr  [ 2 ] ; 
char  NameCode[2]; 
char  OtherEIN [ 1 0 ] ; 
char  MRN [12] ; 
char  EndMRN[12]; 
char  seq_no [ 4 ] ; 
char  EmprNamie  [ 4 8 ] ; 
char  EmprSt reetAdd [4 1 ] ; 
char  EmprCity [ 2 6 ] ; 
char  EmprState [ 1 1 ] ; 
char  Em.prZipCode  [6]; 

char  dummy;  //compensation  for  SUN  byte  alignment 


/**  structure  composed  of  header  info,  final  totals,  and 
cum  ein,  if  it  exists;  server  will  pass  this  entire  struc 

and  client  will  hold  info,  until  a new  ein  is  requested  ** 
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} ; 


unsigned  char 
unsigned  char 
unsigned  char 
unsigned  char 


plat ter_side [ 4 ] ; 
initials [4 ] ; 
num_recs [ 4 ] ; 
browse  start [4 ] ; 


/**  final  totals  **/ 

char  ProcFICAWages [ 1 5 ] ; /**  all  of  these  are  dollar  values  **/ 

char  RepFICAWages [ 15] ; 

char  ProcFICATips [ 14 ] ; 

char  RepFICATips [ 1 4 ] ; 

char  ProcWgsTpsOther  [.1 5 ] ; 

char  RepWgsTpsOther [15] ; 

char  ProcFedTa:-:Wheld[14  ] ; 

char  RepFedTa>:Wheld[14  ] ; 

char  ProcFICATanWheld [ 1 4 ] ; 

char  RepFICATaxWheld [ 14 ] ; 

char  ProcEarnInc [14] ; 

char  RepEarnInc [ 14 ] ; 

char  Procitems [ 8 ] ; /**  this  is  not  a dollar  value  **/ 

char  Repltems[8];  /**  this  is  not  a dollar  value  **/ 


char  ProcDef Comp [ 1 5 ] ; 
char  RepDef Comp [ 15 ] ; 
char  ProcNonequal [ 1 5 ] ; 
char  RepNonequal [15] ; 
char  ProcMedWages [15] ; 
char  RepMedWages [15] ; 
char  ProcMedTa:-:  [ 15  ] ; 
char  RepMedTa:-:  [ 1 5 ] ; 

/**  Cum.  EIN  Totals  **/ 
char  cf lag [ 1 ] ; 
char  cProcFICAWages [ 1 5 ] ; 
char  cProcFICATips [14 ] ; 
char  cProcWgsTpsOther [ 1 5 ] ; 
char  cProcFedTaxWheld [ 14 ] ; 
char  cProcFICATa.xWheld  [ 14  ] ; 
char  cProcEarnInc  [14 ] ; 
char  cProcItems [ 8 ] ; 


/ * ★ 


ascii  0 or  1 
all  of  these 


for  true  or  false 
are  dollar  values 


* * j 
•k-k  J 


/**  this 


is  not  a dollar  value  **/ 


struct  W2EmprHeader 
char  EIN[li; 


/**  ADJUSTED  per 


char  EstabNumber [ 5 ] / 
char  ReportYear [ 5 ] ; 
char  ProcessYea r [ 5 ] ; 
char  TapeLibNum [ 7 ] ; 
char  TypeEmpr[2]; 
char  NameCode[2]; 
char  OtherEIN [10] ; 
char  MRN[12] ; 
char  EndMRN[12]; 
char  seq_no[4]; 
char  EmprMame [ 4 8 ] ; 
char  EmprSt reetAdd [ 4 1 
char  EmprCity [26] ; 
char  EmprState [ 1 1 ] ; 
char  EmprZipCode  [6]; 
char  dummy; 
unsigned  char 
unsigned  char 
unsigned  char 
unsigned  char 


piatter_side [4 
num_recs [4]; 
f inal_of f set [ 4 
cum  offset  [4] ; 


1991  data  **/ 
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} ; 


hat 


W2EmpInfo  { 

j * A- 

ADJUSTED  per  1991  data  **/ 

char 

MRN [12] ; 

char 

EmpSSN [12] ; 

1 -k  k 

two  spaces  included  **/ 

char 

EmpName [28] ; 

char 

PensionInd[2] ; 

char 

DefCompInd [2 ] ; 

char 

AnnFICAWages [ 9 ] ; 

/ * * 

dollar 

value  **/ 

char 

AnnFICATips [9]; 

^ 'k  -k 

dollar 

value  **/ 

char 

AnnWgsTpsOt her [ 11 ] 

m / k k 

dollar 

value  **/ 

char 

FedTaxWheld [11] ; 

^ k k 

dollar 

value  **/ 

char 

FICATa:-:Wheld[8]  ; 

J k k 

dollar 

value  **/ 

char 

AdvEarnInc [ 9 ] ; 

^ k k 

do liar 

value  **/ 

char 

MedWages [10]  ; 

/ k k 

dollar 

value  **/ 

char 

MedTax [ 8 ] ; 

/*- 

dollar 

value  ' ’^  / 

char 

Cont rclMumber [ 8 ] ; 

char 

EmpSt  reetAdd [28]  ; 

char 

DepCare [ 9 ] ; 

/*x 

dollar 

value  **/ 

char 

AllocTips [ 9 ] ; 

/ k k 

dollar 

value  **/ 

char 

EmprGrpTrmlnsCost I 

:9]  ;/ 

**  dollar  value  **/ 

char 

UncFICATipTa:-;  [ 9]  ; 

^ k k 

dollar 

value  **/ 

char 

EmpCity [19]  ; 

char 

EmpState [ 3 ] ; 

char 

EmpZipCode  [ 6 ] ; 

cha  r 

De  f CompAmt [11] ; 

vdollar  value  **/ 

cha  r 

St a tEmpCode [2 ] ; 

char 

FringeEenef its [11] 

; 

j k-k 

dollar  value  **/ 

char 

nqsec [11] ; 

i k k 

dollar  value  **/ 

cha  r 

nqnot [11] ; 

j k k 

dollar  value  **/ 

W2Browse  { 

! k k 

added  11/16/92  - Employee 

char  EmpSSM[12]; 
char  EmpNarp.e  [23]  ; 
char  AnnEICAWages [ 9 ] ; 
char  Ar.r.FICATips  [ 9 ] ; 
char  FICATa;-:VJheld  [ 9 1 ; 
char  AnnWgsTpsOt her  [ 1 1 ] ; 
cha  r MRN [ 12 ] ; 
char  seq_no[4]; 
char  wage_type [2 ] ; 
char  dummy; 

unsigned  char  record  loc[4 


wii  be  displayed  in  the  listbox  **/ 


dollar  value  *’'/ 
'lollar  value  **/ 
dollar  value  **/ 
dollar  value  **/ 


/**  compensation  for  byte  alignment  on  the  SUN  **/ 
/**  offset  for  record  location  **/ 


}; 


//  struct  w2lntermedTotal  deleted  10/19/93  - not  used  by  the  interface 
//  this  structure  is  defined  on  the  server  side  and  used  for  printing 
//  an  entire  em.ployer  report  v;hich  is  also  done  on  the  server  side 


struct  W2FinalTotal  ( / - * ADJUSTED  for  1991  data  **/ 

char  ProcFICAWages  [ 1 5 ] ; /*’'  ail  of  these  are  dollar  values  **/ 

char  RepFICAWages [ 1 5 1 ; 

char  ProcFICATips [ 14 ] ; 

char  RepFICATips [ 1 4 ] ; 

char  ProcWgsTpsOther [15] ; 

char  RepWgsTpsOther [ 1 5 ] ; 

char  ProcFedTaxWheld [ 14 ] ; 

char  RepFedTa.xWheld  [ 1 4 ] ; 

char  PrccFICATa.”Wheld  [14  ] ; 
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In- 

struct 


} ; 

struct 


In- 

struct 


char  RepFICATa:-:Wheld[14  ] ; 
char  ProcEarnInc  [ 14 ] ; 
char  RepEarnInc [14 ] ; 

char  Procitems [ 8 ] ; /**  this  is  not  a dollar  value  **/ 

char  RepI terns  [ 8 ] ; /**  this  is  not  a dollar  value  **/ 

char  ProcDef Comp [ 1 5 ] ; /**  all  of  these  are  dollar  values  **/ 

char  RepDefComp [ 15 ] ; 

char  ProcNonequal [ 15] ; 

char  RepNonequal [ 15 ] ; 

char  ProcMedWages [15] ; 

char  RepMedWages [15] ; 

char  ProcMedTax [ 1 5 ] ; 

char  RepMedTax [15] ; 


W2CumEIN  { /**  ADJUSTED  for  1991  data  **/ 

char  ProcFICAWages [15] ; /**  all  of  these  are  dollar  values  **/ 

char  ProcFICATips [ 1 4 ] ; 
char  ProcWgsTpsOther [ 1 5 ] ; 
char  ProcFedTaxWheld [ 14 ] ; 
char  ProcFICATa;-:VJheld  [ 14  ] ; 
char  ProcEarnInc  [ 14 ] ; 

char  Procitems [ 8 ] ; /**  this  is  not  a dollar  value  **/ 


query  { 


char  Year [ 5] ; 
char  EIN[11] ; 
char  Estab [ 5 ] ; 
char  seq_no[4]; 
char  FName [13]  / 
char  LName [16]  ; 
char  SSN[12] ; 
char  offset  [ 30 ] ; 


added  1/5/93  by  LLD,  query  information 
written  to  query*. txt  which  server 
utilizes  to  conduct  the  search  **/ 

/*^  updated  10/19/93  to  add  seq_no  & offset  **/ 


//sequence  number  of  employer  report 


//browse  offset  or  MRN 


in  stat  [ 


char  interrupted; 
char  resolved; 
char  outlier; 


//added  11/30/93,  internal  structure  to 
//app  that  will  hold  related  statistics  per 
//each  single  query  or  browse  query 

//yes  =1,  no  = 0,  were  there  any  interruptions? 
//yes  =1,  no  = 0,  was  case  resolved? 

//yes  =1,  no  = 0,  is  snet_time  > 1/2  hour? 


//use  difftim,e()  function 
double  snet_time; 
double  qnet_time; 
double  bnet  tim.e; 


to  calculate  net  times  between  two  times 
//stop  - start_single 
//stop  - start_qinfo 
/ / stop_browse  - start_browse 


long  add_matCxh; 


//count  of  how  many  times  addt'l  matches  is  pushed 


time_t  start_single 
time_t  St  a rt_qinf  Ox- 
time t stop  single; 


//-when  single  query  is  chosen 
//when  qinfo  is  opened 

//when  close  or  potential  blanket  is  selected 
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time_t  start_browse; 
time_t  stop_browse; 


}; 


//when  browse  report  is  chosen 
//when  close  is  chosen  from  brinfo 


struct  e:<_stat  { //added  11/30/93,  structure  that  will  be 

//written  to  stat#.fil,  this  structure 
//holds  aggregate  statistics 


//TOTALS  USED  FOR  CALCULATING  AVERAGES  AND  PERCENTAGES 


double  br_tot_time; 

//running  total  of  bnet  time 

double  rs_tot  time; 

//running  total  of  snet_time  of  resolved  cases 
//without  interruptions  (if  interrupted  = 0) 

double  us_tot_time; 

//running  total  of  snet_time  of  unresolved  cases 
//without  interruptions  (if  interrupted  = 0) 

double  rsi_tot_time; 

//running  total  of  snet_time  of  resolved  cases 
//with  interruptions  (if  interrupted  = 1) 

double  usi  tot  time; 

//running  total  of  snet_time  of  unresolved  cases 
//with  interruptions  (if  interrupted  = 1) 

double  rq_tot_time; 

//running  total  of  qnet_time  of  resolved  cases 
//without  interruptions  (if  interrupted  = 0) 

double  uq_tot_time; 

//running  total  of  qnet  time  of  unresolved  cases 
//v;ithout  interruptions  (if  interrupted  = 0) 

double  rqi_tot_time; 

//running  total  of  qnet_time  of  resolved  cases 
//with  interruptions  (if  interrupted  = 1) 

double  uqi_tot_time; 

//running  total  of  qnet_time  of  unresolved  cases 
//with  interruptions  (if  interrupted  = 1) 

long  rtot  non  interrupt; 

//running  total  of  resolved  cases 
//•without  interruptions 

long  utot  non  interrupt; 

//running  total  of  unresolved  cases 
//v;ithout  interruptions 

long  tot_non_inter rupt ; 

//running  total  of  number  of  cases 
//without  interruptions 

//  rtot_non_interrupt  + utot_non_interrupt 

long  rtot_interrupt ; 

//running  total  of  resolved  cases 
/ /with  interruptions 

long  utot  interrupt; 

//running  total  of  unresolved  cases 
//'with  interruptions 

long  tot_inter rupt ; 

//running  total  of  number  of  cases 
//•witn  interruptions 
/ / rtot  interrupt  + utot  interrupt 

long  tot_browse; 

//runnint  total  of  number  of  times 
//browse  report  is  chosen  and  completed 
//incremented  if  stop_browse  !=  0 
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long  tot_cases; 
long  tot_non__cases ; 


long  tot_resolved; 


long  tot_unresolved; 
long  tot_outliers ; 


long  tot_add_records ; 
long  tot_add_matche3 ; 


//running  total  of  number  of  cases 
//  tot_resolved  + tot_unresolved 

//running  total  of  number  of  non-cases, 
//cases  with  a start  time  but  no  stop  time 

//running  total  of  resolved  cases 
//  rtot_non_interrupt  + rtot_interrupt 

//running  total  of  unresolved  cases 
//  utot_non_interrupt  + utot_interrupt 

//running  total  of  number  of  cases 

//identified  as  outliers 

//cases  with  an  snet_time  > 1/2  hour 

//running  total  of  number  of  times  add 
//records  is  pushed  during  browse  report 

//running  total  of  number  of  times 
/'/additional  matches  is  pressed 


long  rtot_add_match; 


long  rtot  add  matchO, 


long  rtot_add_matchl 


long  rtot  add  match2, 


long  rtot  add  matchS; 


long  rtot  add  match4  plus, 


//running  total  of  number  of  times  add  matches 
//is  pressed  for  resolved  cases 

//running  total  of  number  of  resolved  cases 
//in  which  addt'l  matches  was  not  pushed 

//running  total  of  number  of  resolved  cases 
//in  which  addt'l  matches  was  pressed  once 

//running  total  of  number  of  resolved  cases 
//in  which  addt'l  matches  was  pressed  twice 

//running  total  of  number  of  resolved  cases  in 
//which  addt'l  matches  was  pressed  3 times 

//running  total  of  number  of  resolved  cases  in 
//-which  addt'l  matches  was  pressed  4 or  more  times 


long  utot_add  match; 


long  utot  add  matchO, 


long  ut ot_add_matchl 


long  utot  add  match2, 


long  utot  add  matchS; 


long  utot_add_match4_plus 


//running  total  of  number  of  times  add  matches 
.//is  pressed  for  unresolved  cases 

//running  total  of  number  of  unresolved  cases 
//in  which  addt'l  matches  was  not  pushed 

//running  total  of  number  of  unresolved  cases 
//in  which  addt'l  matches  was  pressed  once 

//running  total  of  number  of  unresolved  cases 
//in  -which  addt'l  matches  was  pressed  twice 

//running  total  of  number  of  unresolved  cases  in 
//which  addt'l  matches  was  pressed  3 times 

//running  total  of  number  of  unresolved  cases  in 
//which  addt'l  matches  was  pressed  4 or  more  times 


//AVERAGES  and  PERCENTAGES 


double  avg_br_t ime ; 


//  avg  total  browse  report  time 
//  br  tot  time  / tot  browse 
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double 


double 


double 


double 


double 


double 


double 


double 


double 


double 


double 

e 


double 


double 


double 


double 


avg_add_record; 


rs_avg_t ime; 


r s i_a  V g_t i me  ; 


//  avg  add_records  per  browse  report 
//  t ot_add_records  / tot_browse 

//  avg  total  single  query  time  for  resolved 
//  cases  without  interruptions 
//  r3_tot_time  / rtot_non_interrupt 

//  avg  total  single  query  time  for  resolved 
/ / cases  with  interruptions 
//  rsi_tot_time  / rtot_interrupt 


us_avg_time; 


//  avg  total  single  query  time  for  unresolved 
//  cases  without  interruptions 
//  us_tot_time  / utot_non_interrupt 


usi_avg_t ime ; 


rq_a vg_t ime ; 


rqi_avg_time; 


uq_a vg_t ime ; 


uqi_a vg_t ime ; 


! I avg  total  single  query  time  for  unresolved 
//  cases  with  interruptions 
//  usi_tot_time  / utot_interrupt 

' i avg  browse  single  query  time  for  resolved 
//  cases  without  interruptions 
' ! rq_tot_tim.e  / rtot_non_interrupt 

! ■ avg  browse  single  query  time  for  resolved 
! i cases  with  interruptions 
//  rqi_tot_time  / rtot_interrupt 


//  avg  browse  single  query  time  for  unresolved 
//  cases  without  interruptions 
//  uq_tot_time  / utot_non_interrupt 

■ i avg  browse  single  query  time  for  unresolved 
•' / cases  with  interruptions 
' ! uqi_tot_time  / utot_interrupt 


ravg  add 

match; 

! / 

! / 

avg 

3 um 

number 

of  all 

of  addt'l  matches 
rtot_add_match*  / 

per 

tot_ 

resolved  case 
_resolved 

uavg_add_ 

_match; 

// 

avg 

number 

of  addt'l  matches 

per 

unresolved  cas 

// 

sum 

of  all 

utot  add  match*  / 

tot_ 

unresolved 

avg  add  r 

r;atch; 

/ / 

avg 

tot_ 

nurriber 

add  mat 

of  addt'l  matches 
ches  / tot_cases 

per 

case 

rper_add_ 

ma  t c h 0 ; 

/ / 

perc 

:entage 

of  resolved  cases 

where 

//  addt'l  matches  was  not  pressed 
//  rtot  add  matchO  / tot  resolved 


rper_add_matchl ; 


//  percentage  of  resolved  cases  where 
//  addt'l  matches  was  pressed  once 
//  rtbt  add  matchl  / tot  resolved 


r pe  r_a  dd_m.a  t c h 2 ; 


//  percentage  of  resolved  cases  where 
//  addt'l  matches  was  pressed  twice 
/ i rtot  add  match2  / tot  resolved 


5er  a- 


i i percentage  of  resolved  cases  where 
//  addt'l  matches  was  pressed  3 times 
//  rtot  add  matchS  / tot  resolved 


double 
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double  rper_add_rnaT:ch4_plus ; 


/ / percentage  of  resolved  cases  where 
//  addt'l  matches  was  pressed  4 or  more  times 
//  rtot_add__match4_plus  / tot_resolved 


double  uper_add_mat chO ; 


double  uper_add_mat chi ; 


double  uper_add__match2  ; 


double  uper_add_match3; 


double  uper_add_match4_plu3 ; 


/ / percentage  of  unresolved  cases  where 
! ! addt'l  matches  was  not  pressed 
/' / ut ot_add__matchO  / tot_unresolved 

/ / percentage  of  unresolved  cases  where 
/ / addt'l  matches  was  pressed  once 
//  utot_add_matchl  / tot_unresolved 

/ / percentage  of  unresolved  cases  where 
//  addt'l  matches  was  pressed  twice 
//  utot_add_match2  / tot_unresolved 

/ / percentage  of  unresolved  cases  where 
//  addt'l  matches  was  pressed  3 times 
i ! ut ot_add__ma tch3  / tot__unresolved 

/' /•  percentage  of  unresolved  cases  where 

■' / addt'l  matches  was  pressed  4 or  more  times 

//  utot_add_match4_plus  / tot_unresolved 


//UI  USAGE  TOTALS  PEP.  SELECTED  OPERATION 


long  tot_single_query ; 
long  tot_brov;se_repc rt 
long  tot_print_repc rt ; 
long  tot_blanket; 
long  tot_dif f_report ; 


/ / running 

/ ! running 

/ / running 

/ / running 

/ / running 
/ / opera ti' 


total  of 

total  of 

total  of 

total  of 

total  of 
n (arrow 


single  query  selection 

browse  report  selection 

print  report  selection 

potential  blanket  selection 

select  different  report 
icon  on  qinfo) 


long  tot_qp; 


//running  total  of  displaying  current  query 
//parameters  operation  (QP  icon  on  qinfo) 


long  tot_er_detail ; 
long  tot_ee_detail ; 
long  tot_final; 
long  tot_pr_er_detail ; 


//'running  total  of 

//running  total  of 

'/running  total  of 

//running  total  of 
//detail  selection 


employer  detail  selection 
employee  detail  selection 
report  totals  selection 
print  employer 


long  tot_pr_ee_detail ; ''/ running  total  of  print  employee 

//detail  selection 

long  t ot_ee_det_printed;  //running  total  of  actual  number  of 

//employee  details  printed, 

//this  is  different  that  just  selecting 
//the  pushbutton  operation  because  printing 
//rriultiple  copies  of  employee  details  is 
//an  option,  therefore  this  total  will  be 
.^/accumulated  by  adding  up  atoi  (cnum) 


long  tot_pr_f inal ; 


//running  total  of  print  final  totals  selection 
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long  tot_pr_blanket ; //running  total  of  print  blanket  selection 

long  tot_pr_report ; 


//running  total  of  OK  selection  in  print 
//report  data  entry  dialog 


I 
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ADDMSG  DIALOG  126,62,120,79 

STYLE  DS_MODALFRAME  I WS_POPUP  I WS_CLIPSIBLINGS 
BEGIN 

CONTROL  "Continue", 2, "Button",WS_TABSTOP  I WS_CHILD  | WS_VISIBLE  | BS_PUSHBUTTON, 42 , 53 
,35,14 

CONTROL  "Additional  Matches  to  be  Implemented  at  a Later  Date", 100, "STATIC", SS_CENTER 
I WS_CHILD,28, 9, 64, 34 

CONTROL  "WMPGRAPHIC", 101, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  | WS_CHILD, 92 , 34 , 1 6, 16 
CONTROL  "WMPGRAPHIC", 102, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  | WS_CHILD, 11 , 34 , 16, 16 

END 


STATISTICS  DIALOG  108,62,190,69 

STYLE  DS_MODALFRAME  | WS_POPUP  | WS_CLIPSIBLINGS  1 WS_CLIPCHILDREN  | WS_CAPTION 
CAPTION  "Report  Statistics" 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD  1 WS_VISIBLE, 58 , 4 8 , 30 

,14 


CONTROL 

30,14 

CONTROL 

,20 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

END 


"Cancel", 2, "Button",WS_TABSTOP  I WS_CHILD  | WS_VISIBLE  | BS  PUSHBUTTON,  100 , 4 8 , 


"TO  BE  IMPLEMENTED  AT  A LATER  DATE", 101, 

"WMPGRAPHIC", 102, "BUTTON" , BS_OWNERDRAW  | 
"WMPGRAPHIC", 104, "BUTTON" , BS_OWNERDRAW  | 
"WMPGRAPHIC", 105, "BUTTON" , BS_OWNERD RAW  | 
"WMPGRAPHIC", 106, "BUTTON", BS  OWNERDRAW  | 


'Static", SS_CENTER  1 WS_CHILD, 53, 13, 81 

WS_TABSTOP  I WS_CHILD, 6, 24, 16, 16 
WS_TABSTOP  I WS_CHILD, 151, 8, 16, 16 
WS_TABSTOP  1 WS_CHILD,22, 8, 16, 16 
WS_TABSTOP  1 WS  CHILD, 166, 24, 16, 16 


P TOTALS  DIALOG 
STYLE  WS_POPUP 
BEGIN 

CONTROL 
CONTROL 
CONTROL 


40,19,112,63 
WS  CLIPSIBLINGS 


WS  DLGFRAME 


"Continue", 101, "button", WS_TABSTOP  I WS 
"Report  Totals  Now  Printing", 102, "stati 
"WMPGRAPHIC", 103, "BUTTON", BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC", 104, "BUTTON", BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 106, "BUTTON" , BS_OWNERDRAW 
"WMPGRAPHIC", 107, "BUTTON", BS_OWNERDRAW 
"WMPGRAPHIC", 108, "BUTTON", BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC", 109, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 110, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 111, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 112, "BUTTON" , BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC", 113, "BUTTON" , BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC", 115, "BUTTON" , BS_OWNERD RAW 
"WMPGRAPHIC", 116, "BUTTON", BS_OWNERD RAW 
"WMPGRAPHIC", 117, "BUTTON" , BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC", 118, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 119, "BUTTON" , BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC", 120, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 121, "button", BS_OWNERDRAW 
,32,16,16 
END 


CHILD  I BS  PUSHBUTTON, 


CONTROL 

CONTROL 


CONTROL 

CONTROL 


c", SS_CENTER 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS  TABS TOP 


WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS  CHILD 


39,37,34,10 
,30,18,50,17 
, 0, 0,16, 16 
,0,32,16,16 
,0,16,16,16 
,16,0,16,16 
,32,0,16,16 
,48,0,16,16 
,80,0,16,16 
,0,48,16,16 
,64,0,16,16 
,96,0,16,16 
,96,16,16,16 
, 96,48,16,16 
,16,48,16,16 
,32,48,16,16 
,48,48,16,16 
,64,48,16,16 
,80,48,16,16 
I WS  VISIBLE, 96 


NMSG  DIALOG  164,25,120,79 

STYLE  DS_MODALFRAME  | WS_POPUP  I WS_CLIPSIBLINGS 
BEGIN 

CONTROL  "Continue", 2, "Button",WS_TABSTOP  I WS_CHILD  | WS_VISIBLE  | BS_PUSHBUTTON, 42 , 59 
, 35, 14 

CONTROL  "Your  must  enter  both  the  first  and  last  name  of  the  employee. ",  100, "STATIC",  S 
S_CENTER  1 WS_CHILD, 28, 12, 64, 34 

CONTROL  "WMPGRAPHIC", 101, "BUTTON", BS_OWNERD RAW  | WS_TABSTOP  | WS_CHILD, 97 , 42 , 1 6, 1 6 
CONTROL  "WMPGRAPHIC", 102, "BUTTON", BS_OWNERDRAW  1 WS_TABSTOP  | WS_CHILD, 7, 42, 16, 16 


END 
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QMSG  DIALOG  164,25,120,79 

STYLE  DS_MODALFRAME  | WS_POPUP  | WS_CLIP SIBLINGS 
BEGIN 

CONTROL  "Continue", 2, "Button", WS_TABSTOP  ! WS_CHILD  | WS_VISIBLE  | BS_PUSHBUTTON, 42, 59 
,35,14 

CONTROL  "You  must  enter  either  the  Employee  Name  or  the  Full  SSN  or  both. ",  100, "STATIC 
",SS_CENTER  I WS_CHILD, 28, 6,64,41 

CONTROL  "WMPGRAPHIC", 101, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  | WS_CHILD, 93, 42, 16, 16 
CONTROL  "WMPGRAPHIC", 102, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  | WS_CHILD, 7, 42, 16, 16 

END 

MAIN  DIALOG  0,0,404,302 

STYLE  DS_MODALFRAME  | WS_POPUP  | WS_CLIPSIBLINGS  I WS_CLIPCHILDREN 
BEGIN 

CONTROL  "Single  Query", 125, "button",WS_GROUP  1 WS_TABSTOP  | WS_CHILD  | BS_PUSHBUTTON,  0 
,0,80,24 

CONTROL  "Report  Statistics", 130, "button", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 80, 0,  80 

,24 

CONTROL  "Browse  Report", 126, "button", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON,  160, 0, 80, 24 
CONTROL  "Print  Report", 127, "button", WS_TABSTOP  1 WS_CHILD  | BS_PUSHBUTTON, 240, 0, 80, 24 
CONTROL  "Exit  Program" , 12 8 , "button" , WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 320, 0, 80,24 

END 

HDETAIL  DIALOG  32,33,237,112 

STYLE  DS_MODALFRAME  | WS_POPUP  | WS_CLIPSIBLINGS  I WS__CLIPCHILDREN  | WS_CAPTION 
CAPTION  "Employer  Header  Detail" 

BEGIN 

CONTROL  "Continue", 101, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 73, 95, 40, 16 
CONTROL  "Print", IDPRINTHD, "BUTTON", WS_TABSTOP  | WS_CHILD  | BS_PUSHBUTTON, 130, 95, 40, 16 
CONTROL  "", ID_HDetail, "STATIC", WS_CHILD  | SS_LEFT, 4, 4, 229, 87 

CONTROL  "WMPGRAPHIC", 104, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  I WS_CHILD, 29, 95, 16, 16 
CONTROL  "WMPGRAPHIC", 106, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  I WS_CHILD, 196, 95, 16, 16 

END 


NMOUNT  DIALOG  48,20,94,105 

STYLE  WS_POPUP  1 WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  ! WS_TABSTOP  I WS_CHILD  | WS_VISIBLE, 31, 80, 30 

,14 

CONTROL  "Optical  Disks  Are  Not  Mounted" , 102 , "static" , SS_CENTER  | WS_CHILD, 19, 32, 56, 17 
CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  1 WS__GROUP  | WS_TABSTOP  I WS_CHILD, 18 , 5 
,16,16 

CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  I WS_GROUP  1 WS_TABSTOP  I WS_CHILD, 61 , 5 
,16,16 

CONTROL  "See  System  Administrator", 106, "static", SS_CENTER  | WS_CHILD, 22, 53, 52, 18 

END 


QUERYERROR  DIALOG  164,25,107,120 

STYLE  WS_POPUP  I WS_CLIP SIBLINGS  I WS_DLGFRAME 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  1 WS_CHILD  | WS_VISIBLE, 37 , 99 , 30 

,14 

CONTROL  "A  System  Error  Has  Occurred", 102, "static", SS_CENTER  | WS_CHILD, 16, 38, 76, 19 
CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  I WS_CHILD,  24 , 1 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER  1 WS_CHILD, 15, 66, 77, 24 
CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  I WS_CHILD, 67 , 1 
0,16,16 
END 

BLANKERR  DIALOG  141,20,94,105 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD  1 WS_VISIBLE, 31, 80, 30 
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,14 

CONTROL 

CONTROL 

,16,16 

CONTROL 

,16,16 

CONTROL 

END 


"Blanket  File  Does  Not  Exist", 102, "static", SS_CENTER  | WS_CHILD, 16, 29, 62, 19 
"WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  I WS_CHILD, 1 8 , 5 

"WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  I WS_TABSTOP  | WS_CHILD, 61 , 5 

"See  System  Administrator", 106, "static", SS_CENTER  | WS_CHILD, 16, 51, 62, 19 


EDETAIL  DIALOG  24,22,255,186 

STYLE  DS_MODALFRAME  I WS_POPUP  I WS_CLIPSIBLINGS  I WS_CLIPCHILDREN  1 WS_CAPTION 
CAPTION  "Employee  Detail" 

BEGIN 

CONTROL  "Continue", 101, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 73, 168, 40, 16 
CONTROL  "Print", IDPRINTED, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 144 , 1 68 , 4 0 , 1 6 
CONTROL  "", ID_EDet ail, "STATIC", WS_CHILD  | SS_LEFT, 4, 4, 247, 161 

CONTROL  "WMPGRAPHIC", 104, "BUTTON", BS_OWNERDRAW  1 WS_TABSTOP  1 WS_CHILD, 34, 168, 16, 16 
CONTROL  "WMPGRAPHIC", 106, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  | WS_CHILD, 212 , 168 , 1 6, 1 6 

END 


PEDETAIL  DIALOG 
STYLE  WS_POPUP  I 
BEGIN 

CONTROL 
CONTROL 


100,43,112,63 
WS  CLIPSIBLINGS 


WS  DLGFRAME 


"Continue", IDCONT, "button", WS_TABSTOP  I WS_ 
"Employee  Detail  Now  Printing", 102, "static" 


CONTROL  "WMPGRAPHIC", 103, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 104, "BUTTON", BS_OWNERDRAW 
WMPGRAPHIC", 105, "BUTTON" , BS_OWNERDRAW 
WMPGRAPHIC", 106, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 107, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC" ,108, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 109, "BUTTON", BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC" , 110 , "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 111, "BUTTON", BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC" , 112 , "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 113, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 114, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 115, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 116, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 117, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 118, "BUTTON" , BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC", 119, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 120, "BUTTON", BS  OWNERDRAW 


CONTROL 

CONTROL 


WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 


CHILD  I BS_ 
’,  SS_CENTER 
TABS TOP 
TAB STOP 
TABS TOP 
TAB STOP 
TAB STOP 
TABS TOP 
TAB STOP 
TABS TOP 
TABSTOP 
TABS TOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 


_PUSHBUTTON, 
~|  WS_CHILD, 
WS_CHILD, 0, 
WS_CHILD, 0, 
WS_CHILD, 0, 
WS_CHILD, 16 
WS_CHILD, 32 
WS_CHILD.,  4 8 
WS_CHILD, 80 
WS_CHILD, 0, 
WS_CHILD, 64 
WS_CHILD, 96 
WS_CHILD, 96 
WS_CHILD, 96 
WS_CHILD, 96 
WS_CHILD, 16 
WS_CHILD, 32 
WS_CHILD, 48 
WS_CHILD, 64 
WS  CHILD, 80 


39,37, 

28,18, 

0,16,1 

32.16, 

16.16, 
,0,16, 
,0,16, 
,0,16, 
,0,16, 
48,16, 
,0,16, 
,0,16, 
,16,16 
,32,16 
,48,16 
, 48,16 
,48,16 
,48,16 
,48,16 
, 48,16 


34,10 

57,17 

6 

16 

16 

16 

16 

16 

16 

16 

16 

16 

,16 

,16 

,16 

,16 

,16 

,16 

,16 

,16 


END 


I WS  DLGFRAME 


PHDETAIL  DIALOG  92,25,112,63 
STYLE  WS_POPUP  1 WS_CLIPSIBLINGS  _ 

BEGIN 

CONTROL  "Continue", IDCONT, "button", WS_TABSTOP  I WS_CHILD  I BS 
CONTROL  "Header  Detail  Now  Printing" , 102 , "static" , SS_CENTER 


CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 104, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 106, "BUTTON" , BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC" , 107 , "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC" , 108 , "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 109, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 110, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 111, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 112, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 113, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 114, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 115, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 116, "BUTTON", BS  OWNERDRAW 


WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS  TABSTOP 


_PUSHBUTTON, 
~WS_CHILD, 30 
WS_CHILD, 0, 
WS_CHILD, 0, 
WS_CHILD, 0, 
WS_CHILD, 16 
WS_CHILD, 32 
WS_CHILD, 48 
WS_CHILD, 80 
WS_CHILD, 0, 
WS_CHILD, 64 
WS_CHILD, 96 
WS_CHILD, 96 
WS_CHILD, 96 
WS_CHILD, 96 
WS  CHILD, 16 


39,37, 

,18,50 

0,16,1 

32.16, 

16.16, 
,0,16, 
,0,16, 
,0,16, 
,0,16, 
48,16, 
,0,16, 
,0,16, 
, 16,16 
,32,16 
,48,16 
,48,16 


34,10 

,17 

6 

16 

16 

16 

16 

16 

16 

16 

16 

16 

,16 

,16 

,16 

,16 
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CONTROL  "WMPGRAPHIC", 117, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP 
CONTROL  "WMPGRAPHIC", 118, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP 
CONTROL  "WMPGRAPHIC", 119, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP 
CONTROL  "WMPGRAPHIC", 120, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP 

END 


I WS_CHILD,32,48,16,16 
I WS_CHILD, 48, 48, 16, 16 
1 WS_CHILD, 64,48, 16,16 
I WS_CHILD,80,48,16,16 


PBLANKET  DIALOG  100,46,128,80 

STYLE  WS_POPUP  I WS_CLIP SIBLINGS  | WS_DLGFRAME 
BEGIN 

CONTROL  "Continue", IDCONT, "button",WS_TABSTOP  1 WS_ 
CONTROL  "Blanket  Report  Now  Printing", 102, "static". 


CONTROL  "WMPGRAPHIC", 103, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 104, "BUTTON" , BS_OWNERDRAW 
WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW 
WMPGRAPHIC", 106, "BUTTON" , BS_OWNERDRAW 
WMPGRAPHIC" ,107, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 108, "BUTTON", BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 109, "BUTTON", BS_OWNERDRAW 
WMPGRAPHIC", 110, "BUTTON", BS_OWNERDRAW 
WMPGRAPHIC" , 111 , "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 112, "BUTTON" , BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC", 113, "BUTTON" , BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC" , 114 , "BUTTON" , BS_OWNERDRAW 
WMPGRAPHIC", 115, "BUTTON", BS_OWNERDRAW 
WMPGRAPHIC", 116, "BUTTON", BS_OWNERDRAW 
WMPGRAPHIC", 117, "BUTTON" , BS_OWNERDRAW 
WMPGRAPHIC", 118, "BUTTON", BS_OWNERD RAW 
WMPGRAPHIC", 119, "BUTTON", BS_OWNERDRAW 
WMPGRAPHIC" , 12 0 , "BUTTON" , BS_OWNERDRAW 
WMPGRAPHIC" , 121 , "BUTTON" , BS_OWNERDRAW 
WMPGRAPHIC" , 122 , "BUTTON" , BS_OWNERDRAW 
WMPGRAPHIC", 123, "BUTTON", BS_OWNERDRAW 
WMPGRAPHIC", 124, "BUTTON" , BS_OWNERDRAW 
WMPGRAPHIC", 125, "BUTTON" , BS_OWNERD  RAW 
CONTROL  "WMPGRAPHIC" ,126, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC" , 127 , "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC" ,128, "BUTTON" , BS_OWNERDRAW 
CONTROL  "WMPGRAPHIC", 129, "BUTTON" , BS_OWNERD RAW 
CONTROL  "WMPGRAPHIC" , 130 , "BUTTON" , BS  OWNERDRAW 


CONTROL 

CONTROL 

CONTROL 


CONTROL 

CONTROL 


CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 


WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

WS 

ws^ 

WS 

WS 

WS 

WS 

ws' 

WS 

ws 

ws 

ws' 

ws 

ws 

ws 


CHILD  ! BS 
SS_CENTER 
TABS TOP 
TABSTOP 

’tabstop 

TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 
TABSTOP 


_PUSHBUTTON, 47,47,34,12 
I WS_CHILD, 38,23, 53, 17 
WS_CHILD, 0, 0, 16, 16 
WS_CHILD, 0, 32, 16, 16 
WS_CHILD, 0,16,16,16 
WS_CHILD, 16, 0, 16, 16 
WS_CHILD, 32,0,16, 16 
WS_CHILD, 48, 0, 16, 16 
WS_CHILD, 80,0,16,16 
WS_CHILD, 0, 64, 16, 16 
WS_CHILD, 64,0,16,16 
WS_CHILD, 96,0,16,16 
WS_CHILD, 112,16,16, 16 
WS_CHILD, 112, 32, 16, 16 
WS_CHILD, 112, 0, 16, 16 
WS_CHILD, 16, 64,16,16 
WS_CHILD, 32, 64, 16, 16 
WS_CHILD, 48, 64, 16, 16 
WS_CHILD, 64, 64, 16, 16 
WS_CHILD, 112,64,16, 16 
WS_CHILD, 112,48,16,16 
WS_^CHILD,  80, 64, 16, 16 
WS_CHILD, 0, 48, 16, 16 
WS_CHILD, 96, 64, 16, 16 
WS_CHILD,16,16,16,16 
WS__CHILD,16,32, 16,16 
WS_CHILD,16,48, 16,16 
WS_CHILD, 96,16, 16, 16 
WS_CHILD, 96,32,16, 16 
WS  CHILD, 96, 48, 16, 16 


END 


TOTALS  DIALOG  32,6,269,239 

STYLE  DS_MODALFRAME  | WS_POPUP  I WS_CLIP SIBLINGS  I WS_CLIPCHILDREN  1 WS_CAPTION 
CAPTION  "Final  Totals" 

BEGIN 

CONTROL  "Continue", ID_CONT, "BUTTON", WS_TABSTOP  1 WS_CHILD  1 BS_PUSHBUTTON, 64, 220, 40, 16 
CONTROL  "Print", IDPRINTTOT, "BUTTON", WS_TABSTOP  1 WS_CHILD  | BS_PUSHBUTTON, 165 , 220 , 40 , 1 


CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

END 


•", ID_Tot, "STATIC", WS_CHILD  | SS_LEFT, 8 , 38 , 254 , 177 
'",ID_TotEIN, "STATIC", WS_CHILD  | SS_LEFT, 6, 3, 87, 9 
ID_TotRpt, "STATIC", WS_CHILD  I SS_LEFT, 216, 3, 48,  9 
•TYPE: ",101," STATIC", WS_CHILD  | SS_LEFT, 22, 23, 21, 9 
•PROCESSED: ",107, "STATIC", WS_CHILD  | SS_LEFT, 110 , 23 , 44 , 9 
•REPORTED: ",  108, "STATIC", WS  CHILD  ! SS  LEFT, 208 , 23, 40, 9 


'",109, "STATIC",WS_CHILD 
'",110, " STATIC", WS_CHILD 
'", 111, "STATIC", WS_CHILD 
'",112, " STATIC", WS_CHILD 
'", 113, "STATIC", WS  CHILD 


SS_LEFT, 8, 18, 254,2 
SS_LEFT,8,33,254,2 
SS_LEFT,7,215,257,2 
SS_LEFT, 6,18,2,199 
SS  LEFT, 262, 18, 2, 199 


YEAR_ERR  DIALOG  164,25,132,87 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  | WS_DLGFRAME 
BEGIN 
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CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 49, 64, 35, 18 
CONTROL  "No  Report  Exists  for  that  Year.  Please  Backspace  and  Re-Enter  the  Year. ",100 
, "STATIC",  SS_CENTER  | WS_CHILD, 14, 33, 103, 25 

CONTROL  "WMPGRAPHIC", 101, "button", BS_OWNERDRAW  | WS_TABSTOP  | WS_CHILD, 29, 9, 18, 17 
CONTROL  "WAIT! ",  102, "STATIC", SS_CENTER  | WS_CHILD, 62, 13, 30 , 9 

END 


BLANKETERROR  DIALOG  119,15,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 39, 98, 30, 14 
CONTROL  "A  System  Error  Occurred", 102, "static", SS_CENTER  I WS_CHILD, 20, 39, 67, 18 
CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERD RAW  | WS_GROUP  | WS_TABSTOP  | WS_CHILD,  24 , 1 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER  | WS_CHILD, 20, 65, 67, 20 
CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  1 WS_TABSTOP  | WS_CHILD,  64 , 1 
0,16,16 
END 


DATAERR  DIALOG  164,25,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 37, 99, 30, 14 
CONTROL  "System  Unable  to  Open  Data  File", 102, "static", SS_CENTER  | WS_CHILD,  15, 30, 77, 1 

6 

CONTROL  "WMPGRAPHIC", 10  3, "BUTTON", BS_OWNERDRAW  | WS_GROUP  1 WS_TABSTOP  | WS_CHILD, 24 , 1 
0, 16, 16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER  1 WS_CHILD, 15, 75, 77, 19 
CONTROL  "WMPGRAPHIC", 10  5, "BUTTON", BS_OWNERDRAW  rwS_GROUP  1 WS_TABSTOP  | WS_CHILD,  67 , 1 
0,16,16 

CONTROL  "No  Entries  Were  Added  to  the  List  Box", 106, "static", SS_CENTER  | WS_CHILD, 15, 5 
2,77,16 
END 


ERRORF I LE  DIALOG  164,25,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  | WS_DLGFRAME 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 37, 99, 30, 14 

CONTROL  "System  Unable  to  Open  Local  Error  File", 102, "static", SS_CENTER  I WS_CHILD,8,3 
9,92,19 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERD RAW  | WS_GROUP  I WS_TABSTOP  I WS_CHILD, 24 , 1 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER  I WS_CHILD, 15, 67, 77, 19 

CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  | WS_CHILD, 67 , 1 
0,16,16 
END 


NOMATCH  DIALOG  164,25,107,120 

STYLE  WS_POPUP  1 WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 37 , 99, 30 , 14 
CONTROL  "No  Matches  Found  for  this  Query", 102, "static", SS_CENTER  1 WS_CHILD, 23, 38,  63, 1 
9 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  I WS_TABSTOP  I WS_CHILD, 24, 1 
0,16,16 

CONTROL  "Please  Check  Parameters  and  Re-Enter" , 104 , "static" , SS_CENTER  I WS_CHILD, 15, 63 
,77,24 

CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  1 WS_CHILD, 67 , 1 
0,16,16 
END 

NOMO RE  DIALOG  102,15,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  | WS_DLGFRAME 
BEGIN 
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CONTROL 

CONTROL 

CONTROL 

0,16,16 

CONTROL 

3,77,16 

CONTROL 

END 


"OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 37, 99, 30, 14 
"No  More  Matches  Found", 102, "static", SS_CENTER  I WS_CHILD, 15, 41, 79, 11 
"WMPGRAPHIC",  103,  "BUTTON",  BS_OWNERDRAW  | WS_GROUP  I WS_TABSTOP  | WS_CHILD,  29, 1 

"No  Entries  Were  Added  to  the  List  Box", 106, "static",  SS_CENTER  | WS_CHILD, 15,  6 

"NOTE", 107, "STATIC", SS_CENTER  | WS_CHILD, 51, 13, 27, 11 


QUERYTXT  DIALOG  164,25,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 37, 99, 30, 14 

CONTROL  "System  Unable  to  Open  Query*. Txt  File", 102, "static",  SS_CENTER  1 WS_CHILD, 8 , 39 
,92,19 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  I WS_TABSTOP  I WS_CHILD, 24, 1 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS__CENTER  I WS_CHILD, 15, 67, 77, 19 

CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  I WS__CHILD, 67 , 1 
0,16,16 
END 


SYSERR  DIALOG  132,20,94,105 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 31, 80 , 30 , 14 
CONTROL  "A  System  Error  Has  Occurred" , 1 02 , "static" , SS_CENTER  | WS_CHILD, 16, 29, 62, 19 
CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  I WS_TABSTOP  1 WS_CHILD, 18 , 5 
,16,16 

CONTROL  "WMPGRAPHIC",  105,  "BUTTON",  BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  1 WS__CHILD,  61 , 5 
,16,16 

CONTROL  "See  System  Administrator", 106, "static", SS_CENTER  I WS_CHILD, 16, 51, 62, 19 

END 

QUERY  DIALOG  81,48,226,118 

STYLE  DS_MODALFRAME  | WS_POPUP  | WS_CLIPSIBLINGS  I WS_CAPTION 
CAPTION  "Please  Enter  Query  Information" 

BEGIN 

CONTROL  "MOIOOX;  1,1400, 410,0  I QYear I RepYr  Help  I Gray  Down  1 | " , IDMF_QYear , "MFEDIT" , ES_LEFT 
I WS_TABSTOP  I WS_CHILD  | WS_BORDER, 54 , 5 , 1 01 , 1 3 

CONTROL  "MOIOOX;!, 1418, ElA,0|QEINlEINHelp|Gray  Down! I", IDMF_QEIN, "MFEDIT", ES_LEFT  I WS 
_TABSTOP  I WS_CHILD  | WS_BORDER, 54 , 24 , 101 , 13 

CONTROL  "M0100X;1,400,D1A, OtQNamelNameHelpIGray  Down | | ", IDMF_LName, "MFEDIT", ES_LEFT  1 
ES_UPPERCASE  1 ES_AUTOHSCROLL  | WS_TABSTOP  1 WS_CHILD  | WS_BORDER, 54 , 62, 101, 13 

CONTROL  "MOIOOX;!, 400,D1A, 0 IQNamelNameHelpIGray  Down | i ", IDMF__FName, "MFEDIT", ES_LEFT  | 
ES_UPPERCASE  | ES_AUTOHSCROLL  | WS_TABSTOP  I WS_CHILD  | WS_BORDER, 54, 81, 101, 13 

CONTROL  "MOIOOX;!, 418, ElE, 0 IQSSNI SSNHelpIGray  DownI I ",IDMF_QSSN, "MFEDIT", ES_LEFT  | WS_ 
TABSTOP  I WS_CHILD  | WS_BORDER, 54, 100, 101, 13 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  1 WS_CHILD, 174 , 29, 39, 19 
CONTROL  "Cancel", 2, "Butt on", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 174 , 68 , 39, 19 
CONTROL  "MOIOOX; 1, 1408, E1A,0 I QESTABM Gray  DownI l",IDMF_QEstab, "MFEDIT", ES_LEFT  | ES_AU 
TOHSCROLL  | WS_TABSTOP  | WS_CHILD  | WS_BORDER, 54, 43, 101, 13 
CONTROL  "YEAR", 109, "STATIC", WS_CHILD  | SS_LEFT, 7 , 7 , 33 , 8 
CONTROL  "EIN",  115,  "STATIC",.WS_CHILD  | SS_LEFT,  7, 27, 33,  8 
CONTROL  "ESTAB#", 119, "STATIC", WS_CHILD  1 SS_LEFT, 7, 47, 33, 8 
CONTROL  "LAST  NAME" , 11 6 , "STATIC" , WS_CHILD  1 SS_LEFT, 7, 65, 41 , 8 
CONTROL  "FIRST  NAME", 121, "STATIC", WS_CHILD  I SS_LEFT, 7, 84, 41, 8 
CONTROL  "SSN", 117, "STATIC", WS_CHILD  | SS_LEFT, 7 , 104, 33, 8 

END 


NCOPY  DIALOG  52,20,99,87 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "M0100X;1,40A,C1A, OINiomCopiesI IGray  Down | | ", IDMF_NumCopies, "MFEDIT", ES_LEFT  | 
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WS_TABSTOP  I WS_CHILD  | WS_BORDER, 41 , 4 0 , 17 , 12 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 35, 64 , 30 , 14 
CONTROL  "Please  Enter  the  Desired  Number  of  Copies.  Default  is  one. ",  103, "static",  SS_ 
CENTER  I WS_CHILD, 9, 7, 80,25 
END 

REPORT  DIALOG  92,53,213,84 

STYLE  DS_MODALFRAME  | WS_POPUP  | WS_CLIPSIBLINGS  | WS_CAPTION 
CAPTION  "Please  Enter  Report  Statistics  Information" 

BEGIN 

CONTROL  "MOIOOX; 1, 1418,F1A, 0 I QYear I RepYr  Help  1 Gray  Down | | " , IDMF_RYear, "MFEDIT" , ES_LEFT 
1 WS_TABSTOP  1 WS_CHILD  | WS_BORDER, 58 , 11 , 1 01 , 14 

CONTROL  "MOIOOX;!, 1418, FIA, OlQEINIEINHelpIGray  DownI I ",IDMF_REIN, "MFEDIT", ES_LEFT  | WS 
_TABSTOP  I WS_CHILD  | WS_BORDER, 58, 33, 101, 14 

CONTROL  "MOIOOX;  1, 1408, E1A,0 I QESTABl  I Gray  DownI  I ",IDMF_REstab, "MFEDIT", ES_LEFT  1 ES_AU 
TOHSCROLL  | WS_TABSTOP  1 WS_CHILD  1 WS_BORDER, 58, 55, 101, 14 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 169, 15, 37, 17 
CONTROL  "Cancel", 2, "Button", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 169, 45, 37, 17 
CONTROL  "YEAR", 10  9, "STATIC", WS_CHILD  | SS_LEFT, 7, 15,  33,  8 
CONTROL  "EIN", 115, "STATIC", WS_CHILD  | SS_LEFT,  7 , 37 , 33 , 8 
CONTROL  "ESTAB#", 118, "STATIC", WS_CHILD  | SS_LEFT, 7, 58 , 33, 8 

END 


STYLE  WS_POPUP  1 
BEGIN 

CONTROL  "Continue", 101, "button",WS_ 
CONTROL  "Report  Now  Printing", 102, " 
CONTROL  "WMPGRAPHIC", 103, "BUTTON", 
CONTROL  "WMPGRAPHIC", 104, "BUTTON", 
CONTROL  "WMPGRAPHIC", 105, "BUTTON", 
CONTROL  "WMPGRAPHIC", 106, "BUTTON", 
CONTROL  "WMPGRAPHIC", 107, "BUTTON", 
CONTROL  "WMPGRAPHIC" ,108, "BUTTON" , 
CONTROL  "WMPGRAPHIC", 109, "BUTTON", 
CONTROL  "WMPGRAPHIC", 110, "BUTTON", 
CONTROL  "WMPGRAPHIC", 111, "BUTTON", 
CONTROL  "WMPGRAPHIC", 112, "BUTTON", 
CONTROL  "WMPGRAPHIC", 113, "BUTTON", 
CONTROL  "WMPGRAPHIC", 114, "BUTTON", 
CONTROL  "WMPGRAPHIC", 115, "BUTTON", 
CONTROL  "WMPGRAPHIC", 116, "BUTTON", 
CONTROL  "WMPGRAPHIC", 117, "BUTTON", 
CONTROL  "WMPGRAPHIC", 118, "BUTTON", 
CONTROL  "WMPGRAPHIC", 119, "BUTTON", 
CONTROL  "WMPGRAPHIC", 120, "BUTTON", 


DLGFRAME 


TABS TOP  I WS_CHILD 
"Static", SS  CENTER 


I BS_PUSHBUTTON, 
WS  CHILD, 19,20, 


BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS_OWNERDRAW 
BS  OWNERDRAW 


WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS_TABSTOP 
WS  TABSTOP 


WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS_CHILD 
WS  CHILD 


39, 
73, 
,0, 
,0, 
,0, 
, 16 
,32 
,48 
, 80 
,0, 
,64 
,96 
,96 
,96 
,96 
,16 
,32 
,48 
,64 
, 80 


33,34,10 

11 

0,16,16 
32-,  16, 16 
16,16,16 
,0,16,16 
,0,16,16 
,0,16,16 
,0,16,16 
47,16,16 
,0,16,16 
,0,16,16 
,16,16,16 
, 32,16,16 
,48, 16,16 
,47,16,16 
,47,16,16 
,47,16,16 
, 47,16,16 
,47,16,16 


END 


EINERROR  DIALOG  164,25,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  | WS_DLGFRAME 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 41, 99, 30 , 14 
CONTROL  "No  Report  Exists  for  the  Requested  EIN  and  YEAR", 102, "static", SS_CENTER  I WS_ 
CHILD, 21, 35, 67,24 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  | WS_CHILD, 24 , 1 
0,16,16 

CONTROL  "Press  OK,  Hit  Return  or  ESC,  and  Re-Enter  the  EIN" , 104 , "static" , SS_CENTER  I W 
S_CHILD,23, 67,66,25 

CONTROL  "WAIT! ",  10  6, "STATIC", WS_CHILD  | SS_LEFT,  54 , 14 , 23 , 9 

END 


MRNERR  DIALOG  164,25,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  | WS_DLGFRAME 
BEGIN 
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CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 41, 99, 30 , 14 
CONTROL  "No  Report  Exists  for  the  Requested  MRN", 102, "static", SS_CENTER  1 WS_CHILD,27, 
35,54,24 

CONTROL  "WMPGRAPHIC",  103,  "BUTTON",  BS_OWNERD RAW  | WS_GROUP  I WS_TABSTOP  | WS_CHILD,  24 , 1 
0,16,16 

CONTROL  "Press  OK,  Hit  Return  or  ESC,  and  Re-Enter  the  MRN" , 104 , "static" , SS_CENTER  | W 
S_CHILD,22, 67,66,25 

CONTROL  "WAIT! ",  106, "STATIC", WS_CHILD  | SS_LEFT, 54, 14, 27, 10 

END 

PWERROR  DIALOG  164,25,102,104 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button",BS_DEFPUSHBUTTON  1 WS_TABSTOP  1 WS_CHILD, 39, 82 , 30 , 14 
CONTROL  "System  Does  Not  Recognize  This  Password", 102, "static", SS_CENTER  | WS_CHILD,7, 
31,88,18 

CONTROL  "WMPGRAPHIC",  103,  "BUTTON",  BS_OWNERDRAW  | WS_GROUP  I WS_TABSTOP  | WS_CHILD,  21 , 7 
,16,16 

CONTROL  "Please  Re-Enter  the  Password", 104, "static", SS_CENTER  | WS_CHILD, 15, 57, 77, 18 
CONTROL  "WAIT! ",  10  6, "STATIC", WS_CHILD  | SS_LEFT, 54, 12, 25, 10 

END 


QP ARAM  DIALOG  100,41,166,170 

STYLE  DS_MODALFRAME  I WS_POPUP  I WS_CLIPSIBLINGS  1 WS_CLIPCHILDREN 
BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 72, 149, 39, 14 

CONTROL  "YEAR", 109, "STATIC", WS_CHILD  | SS__LEFT, 7, 31, 33, 10 

CONTROL  "EIN", 115, "STATIC", WS_CHILD  1 SS^LEFT, 7, 51, 33, 10 

CONTROL  "ESTAB#", 119, "STATIC", WS_CHILD  1 SS__LEFT, 7, 71, 33, 10 

CONTROL  "LAST  NAME", 116, "STATIC", WS_CHILD  | SS_LEFT, 7, 89, 47, 10 

CONTROL  "FIRST  NAME", 121, "STATIC", WS_CHILD  1 SS^LEFT, 7 , 108 , 49, 10 

CONTROL  "SSN", 117, "STATIC", WS_CHILD  | SS_LEFT, 7, 128 , 33, 10 

CONTROL  "Single  Query  Parameters", 124, "STATIC", WS_CHILD  I SS_LEFT, 31 , 7 , 116 , 11 

CONTROL  "",qp__year,  "STATIC",  WS__CHILD  | SS_LEFT,  70,  30,  89, 11 

CONTROL  "",qp_ein, "STATIC", WS_CHILD  | SS_LEFT, 70, 50, 89, 11 

CONTROL  "",qp_estab, "STATIC", WS_CHILD  | SS_LEFT, 70, 70, 89, 11 

CONTROL  "",qp_lname, "STATIC", WS__CHILD  | SS_LEFT, 70, 88, 89, 11 

CONTROL  "",qp_fname, " STATIC ",WS_CHILD  | SS_LEFT, 70, 107, 89, 11 

CONTROL  "",qp_ssn, "STATIC", WS__CHILD  | SS_LEFT, 70 , 127 , 89, 11 

END 


SEQERR  DIALOG  164,25,107,128 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 41, 106, 30, 14 
CONTROL  "No  Report  Exists  for  the  Requested  Report  Number", 102, "static", SS_CENTER  I WS 
_CHILD,22, 33, 64,26 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  I WS_GROUP  | WS_TABSTOP  I WS_CHILD, 26, 1 
0,16,16 

CONTROL  "Clear  This  Message  by  Pressing  OK  and  Re-Try  Desired  Operation  with  a Differe 
nt  Report  Number", 104, "static", SS_CENTER  | WS_CHILD, 13, 66, 83, 35 
CONTROL  "WAIT! ",  106, "STATIC", WS_CHILD  I SS_LEFT, 56, 14, 27, 10 

END 


SEQ  DIALOG  146,13,99,106 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  | WS_DLGFRAME 
BEGIN 

CONTROL  "MOIOOX; 0, 40A,C1A, 0 |Custom5 I IGray  DownI  I ", ID_SeqNo, "MFEDIT",ES_LEFT  I ES_UPPER 
CASE  I WS_TABSTOP  | WS_CHILD  | WS_BORDER, 33, 51, 35, 13 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 35 , 82 , 30 , 14 
CONTROL  "Please  Enter  the  Desired  Employer  Report  Number.  Default  is  the  Current  Repo 
rt  Number .", 103, "static", SS_CENTER  | WS_CHILD, 5, 7 , 89,  36 
END 
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PRINT  DIALOG  92,45,213,123 

STYLE  DS_MODALFRAME  | WS_POPUP  I WS_CLIPSIBLINGS  I WS_CAPTION 
CAPTION  "Please  Enter  Print  Information" 

BEGIN 

CONTROL  "MOIOOX; 1, 1418, ElA, 0 1 Password! PWHelp I Gray  Down!  j " , IDMF_Password, "MFEDIT" , ES_LE 
FT  I ES_PASSWORD  | WS_TABSTOP  1 WS_CHILD  j WS_BORDER, 58, 9, 101, 14 

CONTROL  "MOIOOX;!, 1400, 410, OlQYearjRepYr  Help j Gray  Down || ", IDMF_PYear, "MFEDIT", ES_LEFT 
I WS_TABSTOP  I WS_CHILD  | WS_BORDER, 58, 31, 101, 14 

CONTROL  "MOIOOX;!, 1418, FlA,0|QEIN|EINHelp|Gray  Down M ", IDMF_PEIN, "MFEDIT" , ES_LEFT  | WS 
_TABSTOP  I WS_CHILD  j WS_BORDER, 58 , 53 , 1 01 , 14 

CONTROL  "M0100X;0, 1408, FIB, OISequencejjGray  Down||",IDMF_PSeq, "MFEDIT", ES_LEFT  j ES_UP 
PERCASE  I WS_TABSTOP  j WS_CHILD  | WS_BORDER, 58 , 97 , 101 , 14 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 170, 28, 37, 17 
CONTROL  "Cancel", 2, "Button",WS_TABSTOP  1 WS_CHILD  j BS_PUSHBUTTON, 170, 66, 37, 17 
CONTROL  "MOIOOX; 1,4  0A, ElA, 0 I QESTAB II  Gray  Down  II", IDMF_PEstab, "MFEDIT", ES_LEFT  I WS_CHI 
LD  I WS_BORDER, 58,75,101,14 

CONTROL  "PASSWORD", 116, "STATIC", WS_CHILD  1 SS_LEFT, 7, 13, 40, 8 
CONTROL  "YEAR", 109, "STATIC", WS_CHILD  | SS_LEFT, 7 , 35 , 33 , 8 
CONTROL  "EIN", 115, "STATIC", WS_CHILD  | SS_LEFT, 7, 57, 33, 8 
CONTROL  "ESTAB#", 118, "STATIC", WS_CHILD  1 SS_LEFT, 7, 78, 33, 8 
CONTROL  "REPORT#", 121, "STATIC", WS_CHILD  | SS_LEFT, 7 , 1 01 , 42 , 8 

END 

NULLPTR  DIALOG  164,25,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 40 , 99, 3 0 , 14 
CONTROL  "System  Unable  to  Initialize  Next  Window  Due  to  File  Problems", 102, "static",  SS 
_CENTER  I WS_CHILD, 15, 38, 77,24 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  | WS_CHILD, 24 , 1 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER  | WS_CHILD, 15, 70, 77, 19 
CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  | WS_CHILD, 67 , 1 
0,16,16 
END 


MISSINGFILE  DIALOG  108,15,107,120 

STYLE  WS_POPUP  I WS_CLIP SIBLINGS  I WS_DLGFRAME 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 42 , 99 , 30 , 14 

CONTROL  "System  Unable  to  Locate  the  Files  Associated  with  the  Next  Window", 102, "stati 
c",SS_CENTER  I WS_CHILD, 10, 39, 91,23 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  | WS_CHILD, 24 , 1 
0,16,16 

CONTROL  "See  System  Administrator" , 104 , "static" , SS_CENTER  I WS_CHILD, 26, 71, 60, 19 

CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_0WNERDRAW  | WS_GROUP  I WS_TABSTOP  I WS_CHILD, 67 , 1 
0,16,16 
END 


NEWBROWSE  DIALOG  80,45,213,103 

STYLE  DS_MODALFRAME  | WS_POPUP  I WS_CLIPSIBLINGS  I WS_CAPTION 
CAPTION  "Please  Enter  Browse  Report  Information" 

BEGIN 

CONTROL  "MOIOOX;!, 1418, FIA, 0 IQYearIRepYr  Help  I Gray  Down  I | ", IDMF_BrYear, "MFEDIT" , ES_LEF 
T I WS_TABSTOP  | WS_CHILD  | WS_BORDER, 58, 11, 101, 14 

CONTROL  "MOIOOX;!, 1418, FIA, OIQEINIEINHelpIGray  DownI I", IDMF_BrEIN, "MFEDIT", ES_LEFT  | W 
S_TABSTOP  I WS_CHILD  | WS_BORDER,  58 , 33 , 1 01 , 14 

CONTROL  "MOIOOX; 1, 1408,  61B, 0 I StartRecordI  I Gray  Down | | ", IDMF_BrStart, "MFEDIT", ES_LEFT  | 
WS_TABSTOP  I WS_CHILD  | WS_BORDER, 58, 77, lOl, 14 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 169, 21, 37, 17 
CONTROL  "Cancel", 2 » "Butt on'%WS_TABSTGP  I W8_CHU-D  I BS^PUBHaUTTOK, X«e, 87, 37, 17 
CONTROL  "MOIOOX; 1, 4 0 8, ElA, 0 I QESTAB I I Gray  DownI  I ", IDMF_BrEstab, "MFEDIT", ES_LEFT  | ES_AU 
TOHSCROLL  | WS_TABSTOP  | WS_CHILD  | WS_BORDER, 58 , 55, 101, 14 
CONTROL  "YEAR", 109, "STATIC", WS  CHILD  | SS  LEFT, 7 , 15, 33, 8 
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CONTROL  "EIN", 115, "STATIC", WS_CHILD  | SS_LEFT, 7 , 37 , 33 , 8 

CONTROL  "ESTAB#", 118, "STATIC", WS_CHILD  | SS_LEFT, 7 , 58 , 33, 8 

CONTROL  "BEGINNING  MRN" , 121 , "static" , WS_CHILD  1 SS_LEFT, 7, 76, 40, 15 

END 

MAINl  DIALOG  60,81,285,147 

STYLE  DS_MODALFRAME  | WS_POPUP  | WS_CLIP SIBLINGS 
BEGIN 

CONTROL  "Continue", ID_CONT, "button", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 136, 124, 37, 1 
4 

CONTROL  "WMPGRAPHIC", 115, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  | WS_CHILD, 44 , 50 , 62 , 80 
CONTROL  "TO  THE  EAMATE  PROTOTYPE", 116, "static", WS_CHILD  | SS_LEFT, 26, 38, 105, 10 
CONTROL  "1992", 117, "static", SS_CENTER  1 WS_CHILD, 206, 112, 35,  9 

CONTROL  "Laura  L.  Downey,  Computer  Scientist", 121, "STATIC", WS_CHILD  | SS_LEFT, 183,  69,  6 

6,15 

CONTROL  "Natalie  E.  Willman, ",  123, "STATIC", WS_CHILD  | SS_LEFT, 183, 46, 72, 9 
CONTROL  "Senior  Computer  Scientist", 124, "STATIC", WS_CHILD  | SS_LEFT, 183, 54, 93, 9 
CONTROL  "WMPGRAPHIC", 100, "button", BS_OWNERDRAW  | WS_TABSTOP  I WS_CHILD, 8, 9, 64, 29 
CONTROL  "DESIGNED  AND  DEVELOPED  BY" , 1 0 6 , "static" , SS_CENTER  | WS_CHILD, 161, 30, 122, 13 
CONTROL  "National  Institute  of  Standards  and  Technology", 114, "static", SS_CENTER  | WS_C 
HILD, 169,92,106,17 

CONTROL  "", 132, "BUTTON", BS_GROUP BOX  1 WS_TABSTOP  1 WS_CHILD, 1 34 , 11 8 , 41 , 22 

END 

US ERERR  DIALOG  82,0,107,148 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  | WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  1 WS_CHILD, 39, 125, 30 , 14 
CONTROL  "System  Unable  to  Assign  User  Number", 102, "static", SS_CENTER  1 WS_CHILD, 20, 35, 
67,18 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP ' I WS_TABSTOP  I WS_CHILD,  24 , 1 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER  | WS_CHILD, 20, 58, 67, 18 
CONTROL  "WMPGRAPHIC",  105,  "BUTTON", BS_OWNERDRAW  | WS_GROUP  I WS_TABSTOP  I WS_CHILD,  64 , 1 
0,16,16 

CONTROL  "Application  Will  Not  Respond  Properly  Without  Correct  User  Number" , 106, "stati 
c",SS_CENTER  I WS_CHILD,20, 82, 67, 32 
END 

QUESTION  DIALOG  40,0,225,261 

STYLE  DS_MODALFRAME  | WS_POPUP  I WS_VISIBLE  | WS_CLIPSIBLINGS 
BEGIN 

CONTROL  "OK", 1, "button", BS_DEFPUSHBUTTON  | WS_TABSTOP  1 WS_CHILD, 174, 31, 41, 18 
CONTROL  "",  103, "BUTTON", BS_GROUPBOX  | WS_TABSTOP  1 WS_CHILD, 8, 16, 158, 40 
CONTROL  "Did  You  Find  the  Person  You  Were  Looking  For?", 105, "STATIC", WS_CHILD  I SS_LEF 
T, 17, 30, 96, 17 

CONTROL  "Yes",  ID_QlYes,  "BUTTON",  BS_AUTORADIOBUTTON  | WS_GROUP  I WS_TABSTOP  I WS_CHILD, 

131.26.24.10 

CONTROL  "No", ID_QlNo, "BUTTON", BS_AUTORADIOBUTTON  | WS_TABSTOP  I WS_CHILD, 131, 41, 24, 10 
CONTROL  "",104, "BUTTON" , BS_GROUPBOX  | WS_TABSTOP  I WS_CHILD , 8,58,158,40 
CONTROL  "Were  You  Interrupted  at  Any  Time  During  Your  Search?", 106, "STATIC", WS_CHILD  | 
SS_LEFT,17,72, 96,17 

CONTROL  "Yes", ID_Q2 Yes, "BUTTON", BS_AUTORADIOBUTTON  | WS_GROUP  I WS_TABSTOP  I WS_CHILD, 

131.68.24.10 

CONTROL  "No", ID_Q2No, "BUTTON", BS_AUTORADIOBUTTON  | WS_TABSTOP  I WS_CHILD, 131,  83, 24, 10 
CONTROL  "",114, "BUTTON" , BS_GROUPBOX  | WS_GROUP  I WS_TABSTOP  I WS_CHILD ,8,98,158,30 
CONTROL  "Choose  Yes  or  No  to  Each  Question  by  Moving  the  Mouse  Pointer  onto  the  Circle 
Located  Next  to  Desired  Choice  and  Pressing  the  Left  Mouse  Button  Once", 113, "STATIC", SS_C 
ENTER  I WS_CHILD, 11, 104, 150,23 

CONTROL  "", 115, "BUTTON", BS_GROUP BOX  | WS_TABSTOP  | WS_CHILD, 172, 53, 45, 55 
CONTROL  "Press  OK  When  You  Are  Finished  Answering  the  Questions", 111 , "STATIC" , SS_CENTE 
R I WS_CHILD, 176, 60, 37, 45 

CONTROL  "Please  Answer  the  Following  Questions", 102, "STATIC", SS_CENTER  | WS_CHILD, 21 , 3 
,183,12 
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CONTROL  "WMPGPAPHIC", 100, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  | WS_CHILD, 8, 132, 210, 115 
CONTROL  "Beam  Me  Up  Scotty  !!!  *****  I'm  Through  Collecting  Data", 101, "STATIC", SS 

CENTER  1 WS_CHILD,18,250,189, 9 
END 

EXIT  DIALOG  128,48,144,87 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "YES", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  | WS_CHILD, 98 , 1 8 , 42 , 1 6 
CONTROL  "NO",2, "Button",WS_TABSTOP  I WS_CHILD  I BS_PUSHBUTTON, 98 , 50 , 42 , 16 
CONTROL  "ARE  YOU  SURE  YOU  WANT  TO  EXIT?", 100, "static", SS_CENTER  | WS_CHILD, 4, 25, 69, 30 
CONTROL  "WMPGRAPHIC", 102, "BUTTON", BS_OWNERDRAW  | WS_CHILD  1 WS_DISABLED, 78, 18, 16, 16 
CONTROL  "WMPGRAPHIC", 104, "BUTTON", BS_OWNERDRAW  | WS_CHILD  | WS_DISABLED, 78 , 50 , 1 6 , 1 6 
CONTROL  "", 105, "BUTTON", BS_GROUPBOX  | WS_TABSTOP  I WS_CHILD, 4 , 18 , 70, 39 

END 


statwopen  DIALOG  164,25,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 39, 99, 30, 14 

CONTROL  "System  Unable  to  Open  Stat*.fil  For  Writing", 102, "static", SS_CENTER  I WS_CHIL 
D, 28, 38, 55, 27 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  | WS_CHILD, 24, 1 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER  | WS_CHILD, 28, 72, 53, 19 

CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  I WS_CHILD , 67 , 1 
0,16,16 
END 

statwrite  DIALOG  164,25,107,120 

style'  WS_P0PUP  I WS_CLIPSIBLINGS  1 WS_DLGFRAME 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 42 , 94 , 30 , 14 

CONTROL  "System  Unable  to  Write  to  Stat*.fil  File", 102, "static", SS_CENTER  | WS_CHILD,2 
0,35,70,19 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  I WS_CHILD, 24 , 1 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER  | WS_CHILD, 28, 63, 53, 19 

CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  I WS_CHILD, 67 , 1 
0,16,16 
END 


BIT  DIALOG  28,98,335 
STYLE  DS_MODALFRAME  | 
CAPTION  "BITMAPS" 

FONT  10,  "System’' 

BEGIN 

CONTROL  "Function 
CONTROL  "Function 
CONTROL  "Function 
CONTROL  "Function 
CONTROL  "Function 
CONTROL  "Function 
CONTROL  "Function 
CONTROL  "Function 
CONTROL  "Function 
CONTROL  "Function 
CONTROL  "Function 
CONTROL  "Function 
Function 
Function 


,162 

WS  POPUP  I WS 


CLIPSIBLINGS  I WS  CAPTION 


CONTROL 
CONTROL 
CONTROL  "Function 
CONTROt  "runotion 


'M22, 

",123, 

'M24, 

M25, 

",126, 

",127, 

",128, 

",129, 

",130, 

",131, 

",132, 

",133, 

",134, 

",135, 

",136, 

"t 137| 
••  f i 4 a ; 


"BUTTON", 
"BUTTON", 
"BUTTON", 
"BUTTON", 
"BUTTON", 
"BUTTON" , 
"BUTTON", 
"BUTTON" , 
"BUTTON", 
"BUTTON", 
"BUTTON", 
"BUTTON", 
"BUTTON" , 
"BUTTON", 
"BUTTON", 


WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 

WS_TABSTOP 


WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 

WS_CHILD 


BS 

BS' 

BS' 

BS' 

BS] 

BS^ 

BS' 

BS' 

BS] 

BS] 

BS' 

BS' 

BS' 

BS' 

BS" 


PUSHBUTTON, 

'pushbutton, 

'pushbutton, 

'pushbutton, 

'pushbutton, 

'pushbutton, 

'pushbutton, 

'pushbutton, 

'pushbutton, 

'pushbutton, 

'pushbutton, 

'pushbutton, 

^PUSHBUTTON, 

'pushbutton, 

'pushbutton. 


5.8.39. 19 

5.29.39.19 

5.50.39.19 

5.71.39.19 

5.92.39.19 

5.113.39.19 

5.134. 39. 19 

61.8.39.19 

117.1.39.19 

118.44.39.19 

119.66.39.19 

61.29.39.19 

61.50.39.19 

61.71.39.19 

61.92.39.19 
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CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

END 


"Function", 139, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 117, 23, 39, 19 
"WMPGRAPHIC", 141, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  I WS_CHILD, 178 , 1 , 32 , 32 
"WMPGRAPHIC", 142, "BUTTON", BS_OWNERDRAW  1 WS_TABSTOP  I WS_CHILD, 186, 37, 16, 16 
"Function", 143, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 177 , 57 , 39, 19 
"Function", 144, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 179, 82, 39, 19 
"Func", 145, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 248, 12, 35, 18 
"Func", 146, "BUTTON", WS_TABSTOP  | WS_CHILD  | BS_PUSHBUTTON, 248, 32, 35, 18 
"Func", 147, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 248, 52, 35, 18 
"Func", 148, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 248, 72, 35, 18 
"Func", 149, "BUTTON", WS_TABS TOP  I WS_CHILD  | BS_PUSHBUTTON, 248, 92, 35, 18 
"Func", 150, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 248, 112, 35, 18 
"Func", 151, "BUTTON", WS_TABS TOP  1 WS_CHILD  | BS_PUSHBUTTON, 248, 132, 35, 18 
"ErrFunc", 152, "BUTTON", WS_TABSTOP  | WS_CHILD  | BS_PUSHBUTTON, 119, 87, 39, 19 
"ErrFunc", 153, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 118, 108, 39, 19 
"ErrFunc", 154, "BUTTON", WS_TABSTOP  | WS_CHILD  | BS_PUSHBUTTON, 118 , 129, 39, 19 
"UserNumErr", 155, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 17  9, 103, 39, 19 
"Question", 156, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 181, 134, 44, 17 
"statl", 157, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 294 , 8 , 32 , 22 
" St at2", 158, "BUTTON", WS_TABSTOP  | WS_CHILD  | BS_PUSHBUTTON, 294, 32, 32, 22 
"Stat3", 159, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 294 , 56, 32 , 22 
"Stat4", 160, "BUTTON",WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 294 , 80 , 32 , 22 


STATEMPTY  DIALOG  93,0,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  | WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button", BS  DEFPUSHBUTTON  1 WS  TABSTOP 


WS  CHILD, 42, 93, 30, 14 


CONTROL  " Stat*.fil  File  is  Empty", 102, "static", SS_CENTER 
CONTROL  "WMPGRAPHIC" ,103, "BUTTON" , BS_OWNERDRAW  | WS_GROUP 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER 
CONTROL  "WMPGRAPHIC" ,105, "BUTTON" , BS_OWNERDRAW  | WS_GROUP 
0,16,16 
END 


I WS_CHILD,20,38, 70,12 
I WS_TABSTOP  1 WS_CHILD,24,1 

1 WS_CHILD,30, 59, 53,19 
I WS  TABSTOP  I WS  CHILD, 67,1 


STATOPEN  DIALOG  93,0,107,120 

STYLE  WS_POPUP  I WS_CLIPSIBLINGS  I WS_DLGFRAME 
BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  | WS_TABSTOP  I WS_CHILD, 39, 99, 30, 14 
CONTROL  "System  Unable  to  Open  Stat*.fil  For  Reading",  102,  "static" , SS_CENTER  | WS_CHIL 
D, 28, 38, 55, 27 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  | WS_TABSTOP  | WS_CHILD, 24 , 1 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER  | WS_CHILD, 28, 72, 53, 19 
CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  1 WS_TABSTOP  | WS__CHILD, 67 , 1 
0,16,16 
END 


QINFO  DIALOG  5,46,388,252 

STYLE  DS_MODALFRAME  | WS_POPUP  | WS_CLIPSIBLINGS  I WS_CAPTION 
CAPTION  "Query  Information  and  Possible  Matches" 

BEGIN 

CONTROL  "", IDLB_QMatch, "listbox", LBS_NOTIFY  | LBS_USETABSTOPS  1 WS_TABSTOP  I WS_CHILD 
I WS_BORDER  I WS_VSCROLL  | WS_HSCROLL, 8 , 104 , 371 , 119 

CONTROL  "Employer  Detail", 124, "button", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 325, 2 , 59, 
15 


CONTROL  "Report  Totals" , ID_QRepTot , "button" , WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 325, 

19.59.15 

CONTROL  "Potential  Blanket", IDBlanket, "button", WS_TABSTOP  I WS_CHILD  i BS_PUSHBUTTON, 3 

25.36.59.15 

CONTROL  "Close", ID_CLOSE, "button",WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 325, 53, 59, 15 
CONTROL  " Addt'l  Matches", ID_QAddMatch, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 
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CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

AR  OR  PRESS 
T, 4, 234, 226, 
CONTROL 

,35,30,37 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

END 


"MRN”, 132, "static", SS_CENTER  I WS_CHILD, 17, 92, 25, 8 

"Wage  Type", 143, "static", SS_CENTER  | WS_CHILD, 73, 83, 21, 17 

"FICA  Wages", 133, "static", SS_CENTER  I WS_CHILD, 97, 83, 23, 17 

"FICA  Tips", 134, "static", SS_CENTER  | WS_CHILD, 136, 83, 19, 17 

"FICA  Tax  W/H", 135, "static", SS_CENTER  | WS_CHILD, 169, 83, 30, 17 

"Wgs/Tips/  Other", 139, "static", SS_CENTER  | WS_CHILD, 207, 83, 36, 17 

"SSN", 140, "static", SS_CENTER  I WS_CHILD, 255, 92, 30, 8 

"NAME", 136, "static", SS_CENTER  | WS_CHILD, 310, 92, 30, 8 

"", ID_QEmprHeader, "STATIC", WS_CHILD  | SS_LEFT, 7, 10, 265, 53 

"EMPLOYER  BROWSE  DATA", 147, "STATIC", WS_CHILD  | SS_LEFT, 7, 2, 268, 8 

"EMPLOYEE  BROWSE  DATA", 149, "STATIC", WS_CHILD  | SS_LEFT, 3, 73, 381, 8 

"",  150, "STATIC", WS_CHILD  | SS_LEFT, 272 , 2 , 4 , 61 

"", 151, "STATIC", WS_CHILD  | SS_LEFT, 3 , 2 , 4 , 61 

"", 152, "STATIC", WS_CHILD  | SS_LEFT, 3 , 63 , 273 , 4 

"", 153, "STATIC", WS_CHILD  | SS_LEFT, 3, 225, 380, 4 

"",154, "STATIC", WS_CHILD  | SS_LEFT, 3, 81, 4, 145 

"", 155, "STATIC", WS_CHILD  I SS_LEFT, 380 , 81 , 4 , 148 

"Rep.  No. ",  141, "static", SS_CENTER  | WS_CHILD, 57, 83, 16, 17 

"**POSITION  THE  HIGHLIGHT  BAR  ON  SELECTION  AND  EITHER  DOUBLE-CLICK  ON  THE  B 
THE  ENTER  KEY  TO  DISPLAY  THE  EMPLOYEE  DETAIL** ",  137 , "STATIC" , WS_CHILD  | SS_LEF 
16 

"Press  Arrow  to  Select  Different  Report ",  158 , "STATIC" , SS_CENTER  | WS_CHILD,284 

"WMPGRAPHIC", ID_Change, "BUTTON", BS_OWNERDRAW  | WS_CHILD, 283, 2, 32, 32 
"WMPGRAPHIC", 159, "BUTTON", BS_OWNERDRAW  | WS_TABSTOP  | WS_CHILD, 234 , 231 , 2 0 , 2 0 
" « Pres  QP  to  Display  ",  160 , "STATIC" , WS_CHILD  | SS_LEFT, 256, 234, 63, 8 
" « Query  Parameters", 162, "STATIC", WS_CHILD  | SS_LEFT, 256, 242, 63, 8 


BRREPORT  DIALOG  5,46,388,252 

STYLE  DS_MODALFRAME  | WS_POPUP  | WS_CLIPSIBLINGS  | WS_CAPTION 
CAPTION  "Browse  Report" 

BEGIN 

CONTROL  "", IDLB_BrMatch, "listbox", LBS_NOTIFY  | LBS_USETABSTOPS  I WS_TABSTOP  | WS_CHILD 
I WS_BORDER  I WS_VSCROLL  | WS_HSCROLL, 8 , 1 04 , 371 , 119 

CONTROL  "Employer  Detail", 124, "button", WS_TABSTOP  | WS_CHILD  | BS_PUSHBUTTON, 325, 3, 59, 

18 

CONTROL  "Report  Totals" , ID_BrRepTot , "button" , WS_TABSTOP  | WS_CHILD  | BS_PUSHBUTTON, 325 
,27,59,18 

CONTROL  "Close", ID_CLOSE, "button",WS_TABSTOP  1 WS_CHILD  | BS_PUSHBUTTON, 325, 52, 59, 18 
CONTROL  " Addt'l  Records", ID_BrAddRec, "BUTTON", WS_TABSTOP  I WS_CHILD  | BS_PUSHBUTTON, 3 
25,232,59, 18 

CONTROL  "", 156, "STATIC", WS_CHILD  | SS_LEFT, 7, 81, 373, 22 
CONTROL  "", ID_BrEmprHeader, "STATIC", WS_CHILD  | SS_LEFT, 7, 10, 265, 53 
CONTROL  "MRN", 132, "static", SS_CENTER  | WS_CHILD, 17 , 92 , 25 , 8 
CONTROL  "Rep.  No .", 141 , "static" , SS_CENTER  | WS_CHILD, 57, 83, 16, 17 
CONTROL  "FICA  Wages", 133, "static", SS_CENTER  | WS_CHILD, 97, 83, 23, 17 
CONTROL  "FICA  Tips" , 134 , "static" , SS_CENTER  1 WS_CHILD, 136, 83, 19, 17 
CONTROL  "FICA  Tax  W/H", 135, "static", SS_CENTER  | WS_CHILD, 169, 83, 30, 17 
CONTROL  "Wgs/Tips/  Other", 139, "static", SS_CENTER  | WS_CHILD, 207 , 83, 36, 17 
CONTROL  "SSN", 140, "static", SS_CENTER  | WS_CHILD, 255, 92, 30, 8 
CONTROL  "NAME", 136, "Static", SS_CENTER  I WS_CHILD, 310, 92, 30, 8 

CONTROL  "****  POSITION  THE  HIGHLIGHT  BAR  ON  SELECTION  AND  EITHER  DOUBLE-CLICK  ON  TH 
E BAR  OR  PRESS  THE  ENTER  KEY  TO  DISPLAY  THE  EMPLOYEE  DETAIL  ****", 137 , "STATIC" , SS_C 

ENTER  I WS_CHILD, 4,234, 314, 16 

CONTROL  "EMPLOYER  BROWSE  DATA" , 147 , "STATIC" , WS_CHILD  | SS_LEFT, 7 , 2 , 268 , 8 

CONTROL  "EMPLOYEE  BROWSE  DATA" , 149, "STATIC" , WS_CHILD  | SS_LEFT, 3, 73 , 381 , 8 

CONTROL  "", 150, "STATIC", WS_CHILD  | SS_LEFT, 272 , 2 , 4 , 61 

CONTROL  "", 151, "STATIC", WS_CHILD  | SS_LEFT, 3 , 2 , 4 , 61 

CONTROL  "", 152, "STATIC", WS_CHILD  | SS_LEFT, 3, 63, 273, 4 

CONTROL  "", 153, "STATIC", WS_CHILD  | SS_LEFT, 3, 225, 380, 4 

CONTROL  "", 154, "STATIC", WS_CHILD  | SS_LEFT, 3, 81 , 4 , 145 

CONTROL  "", 155, "STATIC", WS_CHILD  | SS_LEFT, 380 , 81 , 4 , 148 

CONTROL  "Wage  Type", 143, "static", SS_CENTER  1 WS_CHILD, 73, 83, 21, 17 


dialog,  dig 


Wed  Mar  2 14:13:45  1994 


14 


END 


BINFO  DIALOG  5,46,388,252 

STYLE  DS_MODALFRAME  1 WS__POPUP  1 WS__CLIPSIBLINGS  I WS__CAPTION 
CAPTION  "Blanket  Information  " 

BEGIN 

CONTROL  "",IDLB__BMatch,  "listbox",  LBS_NOTIFY  | LBS__USETABSTOPS  1 WS__TABSTOP  | WS__CHILD 
1 WS_BORDER  1 WS__VSCROLL  | WS_HSCROLL, 8, 104, 371, 119 

CONTROL  "Employer  Detail", 124, "button", WS_TABSTOP  | WS_CHILD  ! BS__PUSHBUTTON, 325, 1, 59, 
15 


•Report  Totals", ID__BRepTot, "button", WS_TABSTOP 
•Print  Blanket", IDPRINTB, "button", WS  TABSTOP  i 


WS  CHILD 


I BS__PUSHBUTTON,  325, 
BS_PUSHBUTTON, 325, 35 
BS  PUSHBUTTON, 325, 52, 59, 15 


WS  CHILD 


CONTROL 
18,59,15 

CONTROL 
,59,15 

CONTROL  "Close",  ID__CLOSE,  "button", WS__TABSTOP  1 WS_CHILD  _ 

CONTROL  "",156, "STATIC", WS_CHILD  1 SS__LEFT, 7 , 81 , 373, 22 
CONTROL  "FICA  Wages",  133,  "static",  SS__CENTER  | WS__CHILD,  97, 83, 23, 17 
CONTROL  "FICA  Tips" , 134 , "static" , SS__CENTER  | WS_CHILD, 136, 83, 19, 17 
CONTROL  "FICA  Tax  W/H" , 135,  "static" , SS__CENTER  ! WS__CHILD,  169,  83, 30, 17 
CONTROL  "Wgs/Tips/  Other" , 139 , "static" , SS__CENTER  | WS__CHILD,  207, 83, 36, 17 
CONTROL  "SSN", 140, "static", SS_CENTER  1 WS__CHILD, 255, 92, 30, 8 
CONTROL  "NAME",  136,  "static",  SS__CENTER  1 WS__CHILD,  310, 92, 30, 8 

CONTROL  "****  POSITION  THE  HIGHLIGHT  BAR  ON  SELECTION  AND  EITHER  DOUBLE-CLICK  ON  TH 
E BAR  OR  PRESS  THE  ENTER  KEY  TO  DISPLAY  THE  EMPLOYEE  DETAIL  ****", 137, "STATIC", SS_C 

ENTER  i WS__CHILD,  35,  233, 314, 16 

CONTROL  "",  ID__BEmprHeader,  "STATIC", WS_CHILD  | SS__LEFT,  7, 10, 265, 53 
CONTROL  "Rep.  No .",  141 , "static" , SS__CENTER  | WS__CHILD,  57,  83, 16, 17 
•Wage  Type", 143, "static", SS_CENTER  | WS__CHILD, 73, 83, 21, 17 
•EMPLOYER  BROWSE  DATA" , 147 , "STATIC" , WS__CHILD  ! SS__LEFT,  7 , 2 , 268 , 8 
•EMPLOYEE  BROWSE  DATA" , 149 , "STATIC" , WS  CHILD  ! 


CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 

CONTROL 


SS  LEFT, 3, 73, 381, 8 


',  150,  "STATIC", WS__CHILD 
',151,  "STATIC", WS__CHILD 
',152,  "STATIC", WS__CHILD 
',153,  "STATIC", WS_CHILD 
',154,  " STATIC", WS__CHILD 
', 155, "STATIC", WS  CHILD 


SS__LEFT,272,2,  4, 61 
SS__LEFT,  3, 2, 4,  61 
SS__LEFT,3,  63,273,4 
SS__LEFT,  3,225,  380,4 
SS__LEFT,3,81,4,145 
SS  LEFT, 380, 81, 4, 148 


•MRN", 132, "static", SS  CENTER  | WS  CHILD, 17, 92, 25, 8 


END 


DETAILTXT  DIALOG  113,25,107,120 

STYLE  WS__POPUP  I WS__CLIP SIBLINGS  | WS__DLGFRAME 

BEGIN 

CONTROL  "OK",  1,  "Button",BS__DEFPUSHBUTTON  j WS__TABSTOP  I WS__CHILD,  37 , 99,  30 , 14 

CONTROL  "System  Unable  to  Open  detl*.txt  File", 102, "static", SS__CENTER  1 WS_CHILD, 8 , 39, 
92,19 

CONTROL  "WMPGRAPHIC",  103,  "BUTTON",  BS__OWNERDRAW  | WS__GROUP  i WS__TABSTOP  I WS__CHILD,  24 , 1 
0,16,16 

CONTROL  "See  System  Administrator",  104,  "static",  SS__CENTER  1 WS__CHILD,  15 , 67 , 77 , 19 

CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS__OWNERDRAW  | WS_GROUP  I WS_TABSTOP  I WS__CHILD, 67 , 1 
0,16,16 
END 

EINORSEQ  DIALOG  148,25,131,150 

STYLE  WS_POPUP  1 WS_CLIP SIBLINGS  I WS__DLGFRAME 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  ! WS_TABSTOP  I WS_CHILD, 52 , 131 , 30 , 14 

CONTROL  "No  Report  Exists  for  the  Requested  EIN  or  Report  Number", 102, "static", SS_CENT 
ER  1 WS_CHILD, 11, 30, 111, 18 

CONTROL  ••WMPGRAPHIC",  103,  "BUTTON",  BS_OPmERDRAW  1 WS_GROUP  I WS__TABSTOP  I WS__CHILD,  41 , 6 
,16,16 

CONTROL  "Press  OK,  Hit  Return  or  ESC,  and  Re-Enter  the  EIN  or  Report  Number", 104, "st at 
ic", SS_CENTER  | WS_CHILD, 17, 53, 96, 27 

CONTROL  '•WAIT!  ",  106,  "STATIC", WS_CHILD  | SS_LEFT,  71, 11, 27, 10 

CONTROL  "NOTE:  This  Box  Also  Appears  When  You  Try  to  Print  a File  Larger  Than  5000  Em 
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ployees.  See  the  System  Administrator  to  Print  Large  Reports 107, "STATIC", SS_CENTER  I W 

S_CHILD,14, 83,104,42 

END 

HEADERTXT  DIALOG  113,25,107,120 

STYLE  WS_POPUP  1 WS_CLIP SIBLINGS  I WS_DLGFRAME 

BEGIN 

CONTROL  "OK", 1, "Button", BS_DEFPUSHBUTTON  I WS_TABSTOP  I WS_CHILD, 37 , 99, 30 , 14 
CONTROL  "System  Unable  to  Open  hdr*.txt  File" , 102, "static", SS_CENTER  | WS_CHILD, 8, 39, 9 

2,19 

CONTROL  "WMPGRAPHIC", 103, "BUTTON", BS_OWNERDRAW  | WS_GROUP  1 WS_TABSTOP  I WS_CHILD, 24 , 1 
0,16,16 

CONTROL  "See  System  Administrator", 104, "static", SS_CENTER  1 WS_CHILD, 15, 67, 77, 19 
CONTROL  "WMPGRAPHIC", 105, "BUTTON", BS_OWNERDRAW  | WS_GROUP  1 WS_TABSTOP  | WS_CHILD, 67, 1 
0,16,16 
END 
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; Filename:  EAMAT42.DEF 

; "EAMAT42"  Generated  by  WindowsMAKER  Professional. 
; Author:  Laura  L.  Downey 


*********************************************************************** 
Do  not  add  code  here. 

This  file  is  maintained  by  WindowsMAKER  Professional. 

As  you  make  changes  in  your  application  using  WindowsMAKER  Professional, 
this  file  is  automatically  updated,  therefore  you  never  modify  this  file. 


For  more  information, 

see  the  section  "How  code  is  generated"  in  the  documentation. 
*********************************************************************** 


NAME 

DESCRIPTION 
EXE TYPE 
STUB 

HEAP SIZE 
STACKS I ZE 
DATA 
CODE 

SEGMENTS 


EXPORTS 


EAMAT42 

' EAMATE  generated  by  WindowsMAKER  Professional' 

WINDOWS 

'WINSTUB.EXE' 

10248 

8192 

MOVEABLE  MULTIPLE 
MOVEABLE  DISCARDABLE  PRELOAD 


USERCODE 

’EAMAT42 

’service 

’custom 

'error 

PRINT 

’STAT 

’text 


MOVEABLE  DISCARDABLE  PRELOAD 
MOVEABLE  DISCARDABLE  PRELOAD 
MOVEABLE  DISCARDABLE  PRELOAD 
MOVEABLE  DISCARDABLE  PRELOAD 
MOVEABLE  DISCARDABLE  PRELOAD 
MOVEABLE  DISCARDABLE  PRELOAD 
MOVEABLE  DISCARDABLE  PRELOAD 
MOVEABLE  DISCARDABLE  PRELOAD 


BLDMainWndP  roc 

BLD_QUERYDlgProc 

BLD_MAINClProc 

BLD_PrintDlgProc 

BLD_OKDlgProc 

BLD_FunctionDlgProc 

BLD_Function2DlgProc 

BLD_Function6DlgProc 

BLD_HeaderDetailDlgProc 

BLD_EmployeeDetailDlgProc 

BLD_BrowseReportDlgProc 

BLD_ReportStatisticsDlgProc 

BLD_Repo  rtDlgP  roc 

BLD_BrowseEntryDlgProc 

BLD_ReportTotalsDlgProc 

BLD_EINErrDlgProc 

BLD_QueryMessageDlgProc 

BLD_NMSGDlgProc 

BLD_QueryErrDlgProc 

BLD_BlanketErrDlgProc 

BLD_PWErrDlgProc 

BLD_Year_ErrDlgProc 

BLD_SysErrDlgProc 

BLD_BlankErrDlgProc 

BLD_MissingFileDlgProc 

BLD_QueryTxtDlgProc 
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BLD_ErrorFileDlgProc 

BLD_NULLPtrDlgProc 

BLD_DataErrDlgProc 

BLD_DFileErrDlgProc 

BLD_NoMoreMatchesDlgProc 

BLD_Sec[uenceDlgProc 

BLD_MRNErrDlgProc 

BIiD_MatchErrDlgProc 

BLD_PrintBlanketDlgProc 

BLD_PrintEmpDetailDlgProc 

BLD_PrintHeaderDetailDlgProc 

BLD_Function5DlgProc 

BLD_TotNowPrintDlgProc 

B LD_Ge t NumC opy D 1 gP r o c 

BLD_qparamDlgProc 

BLD_EINorSeqErrDlgProc 

BLD_SeqErrDlgProc 

BLD_HFileDlgProc 

BLD_Us  e r NmnE  r rD  1 gP  r o c 

BLD_questDlgProc 

BLD_StatOpenDlgProc 

BLD_S  t at Empt yDlgP  r oc 

BLD_StatWOpenDlgProc 

BLD_StatWriteErrDlgProc 


eaznat42.1nk  Wed  Mar  2 14:13:49  1994  1 

USERCODE  EAMAT42  SERVICE  CUSTOM  ERROR  PRINT  STAT 
EAMAT42.EXE 

/map  /CO  /align: 16  /NOD 
LIBW  MLIBCEW  tklibw  mfedit 
EAMAT42 .DEF 


eainat42 . rc 


Wed  Mar  2 14:13:51  1994 


1 


//  Filename:  EAMAT42.RC 

//  "EAMAT42"  Generated  by  WindowsMAKER  Professional. 

//  Author:  Laura  L.  Downey 

// 

II  *********************************************************************** 

//  Do  not  add  code  here. 

// 

//  This  file  is  maintained  by  WindowsMAKER  Professional. 

//  As  you  make  changes  in  your  application  using  WindowsMAKER  Professional, 
//  this  file  is  automatically  updated,  therefore  you  never  modify  this  file. 
// 

// 

// 

//  For  more  information, 

//  see  the  section  "How  code  is  generated"  in  the  documentation. 

// 

II  *********************************************************************** 

// 

#define  THISISBLDRC 

#include  "WINDOWS. H" 

#include  "GENERIC. H" 


#include  "DIALOG. DLG" 


ARCADE 

BITMAP 

ARCHES 

BITMAP 

ARGYLE 

BITMAP 

BOXES 

BITMAP 

CASTLE 

BITMAP 

EGYPT 

BITMAP 

QUESTION 

BITMAP 

RIVETS 

BITMAP 

THATCH 

BITMAP 

WELCOME 

BITMAP 

ZIGZAG 

BITMAP 

CONTINUE 

BITMAP 

LINE 

BITMAP 

OUTLINE 

BITMAP 

QPARAM 

BITMAP 

BRANCH 

BITMAP 

EYE 

BITMAP 

CH 

BITMAP 

ARR 

BITMAP 

QUEST 

BITMAP 

X 

BITMAP 

PARAM 

BITMAP 

BLKHOLE 

BITMAP 

ENTERPRZ 

BITMAP 

CHART 1 

ICON 

CHARTS 

ICON 

CHART 4 

ICON 

CHARTS 

ICON 

FELLIPSE 

ICON 

FFIND 

ICON 

NOTE 

ICON 

STOP 

ICON 

TERMINAL 

ICON 

TTT 

ICON 

ARCADE . BMP 
ARCHES .BMP 
ARGYLE . BMP 
BOXES . BMP 
CASTLE.BMP 
EGYPT . BMP 
QUESTION.BMP 
RIVETS . BMP 
THATCH . BMP 
WELCOME . BMP 
ZIGZAG.BMP 
CONTINUE.BMP 
LINE . BMP 
OUTLINE . BMP 
QPARAM.BMP 
BRANCH . BMP 
EYE . BMP 
CH.BMP 
ARR.BMP 
QUEST.BMP 
X.BMP 
PARAM.BMP 
BLKHOLE . BMP 
ENTERPRZ . BMP 

CHART 1 . ICO 
CHARTS. ICO 
CHART 4 . ICO 
CHARTS. ICO 
FELLIPSE. ICO 
FFIND. ICO 
NOTE. ICO 
STOP. ICO 
TERMINAL. ICO 
TTT.ICO 


2 


eamat42 

. rc 

Wed  Mar 

PCI 

ICON 

PCI. ICO 

NOTEl 

ICON 

NOTEl . ICO 

N0TE2 

ICON 

NOTE2 . ICO 

EDITl 

ICON 

EDITl. ICO 

EDIT2 

ICON 

EDIT2.IC0 

EXITl 

ICON 

EXITl. ICO 

EXIT2 

ICON 

EXIT2 . ICO 

51  1994 


II  ***************** ************************************** 

/ / Resource  code  for  error  message  strings 

/ / ******************************************************* 


STRINGTABLE 

BEGIN 

BLD_CannotRun 

BLD_CannotCreate 

BLD_CannotLoadMenu 

BLD_CannotLoadIcon 

BLD_CannotLoadBitmap 

BLD  CannotCreateWindow 


"Cannot 

"Cannot 

"Cannot 

"Cannot 

"Cannot 

"Cannot 


run  " 

create  dialog  box 
load  menu  " 
load  icon  " 
load  bitmap  " 
create  window  " 


II 


END 
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//  Filename:  EAMAT42.WMC 

//  "EAMAT42"  Generated  by  WindowsMAKER  Professional. 

//  Author:  Laura  L.  Downey 

// 

II  *********************************************************************** 

//  Do  not  add  code  here.  Add  code  in  the  .C  file. 

// 

//  This  file  is  maintained  by  WindowsMAKER  Professional. 

//  As  you  make  changes  in  your  application  using  WindowsMAKER  Professional, 
//  this  file  is  automatically  updated,  therefore  you  never  modify  this  file. 
// 

// 

// 

//  For  more  information, 

//  see  the  section  "How  code  is  generated"  in  the  documentation. 

// 

II  *********************************************************************** 

// 


II  ************************************************************* 

//  GLOBAL  VARIABLES 

! ! ************************************************************* 


HINSTANCE 

hinst 

= 

0; 

// 

Handle  to  instance. 

HWND 

MainhWnd 

= 

0; 

// 

Handle  to  main  window. 

UINT 

wBLDWindowType 

= 

0; 

// 

Registered  Message  for  toolbars 

UINT 

wHelpMessage 

= 

0; 

// 

Registered  Message  for  Help 

BOOL 

bHelpSupport 

= 

FALSE, 

// 

Controlling  Help  Support 

DWORD 

dwDialogProp 

= 

0; 

// 

Controlling  Dialog  Box  Color 

BOOL 

b256Color 

= 

TRUE; 

// 

Controlling  bitmap  drawing 

HINSTANCE 

hBMPInst 

= 

0; 

// 

Handle  to  instance  for  bitmaps 

HWND 

hClient 

= 

0; 

// 

Handle  to  window  in  client  area. 

DLGPROC 

IpClient 

= 

OL; 

// 

Function  for  window  in  client  area 

HWND 

hMDIClient 

_ 

0; 

// 

Handle  to  client  window  for  MDI . 

UINT 

idMDIFirstChild= 

100; 

// 

ID  to  first  child  for  MDI. 

HWND  MAINhDlg  =0; 

DLGPROC  MAINlpProc=0L; 

II  ************************************************************* 

//  FUNCTIONS  FOR  INITIALIZATION  AND  EXIT  OF  APPLICATION 

II  ************************************************************* 

BOOL  BLDInitApplication (HINSTANCE  hinst , HINSTANCE  hPrev,int  *pCmdShow, LPSTR  IpCmd) 

{ 

wBLDWindowType=RegisterWindowMessage ( "BLDToolbarMessage" ) ; 
wHelpMessage=RegisterWindowMessage ("BLDHelpMessage")  ; 
return  BLD_AoplicationAppInit (hinst , hPrev, pCmdShow, IpCmd) ; 

} 


//  Registers  the  classes  for  all  windows 
BOOL  BLDRegisterClass (HINSTANCE  hinstance) 
{ 

BOOL  bReturn; 

bReturh=BLDMainRegClass (hinstance) ; 


return  bReturn; 
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//  Creates  windows  at  Initialization 
HWND  BLDCreateWindow (HINSTANCE  hinstance) 
{ 

return  BLDMainCreateWnd ( ) ; 

} 


//  Called  just  before  entering  message  loop 
BOOL  BLDInitMainMenu (HWND  hWnd) 

{ 

return  TRUE; 

} 


BOOL  BLDExitApplication ( ) //  Called  just  before  exit  of  application 


#ifdef  WIN32 
if  (TRUE) 

#else 

if  (GetModuleUsage (hinst ) ==  1) 
#endif 

{ 

BLDMainExitClass  0 ; 

} 

return  TRUE; 

} 


j j **************** ********************************* ************ 

//  PROCESSES  KEYBOARD  ACCELERATORS 

//  AND  MODELESS  DIALOG  BOX  KEY  INPUT 

II  ************************************************************* 

BOOL  BLDKeyTranslation (MSG  *pMsg) 

{ 

//  Translates  keystrokes  for  toolbars  and  client  area  controls 
if (BLDIsClientDlgDialogMessage (pMsg) ) 
return  TRUE; 

//  Translates  keystrokes  for  modeless  dialog  box 
if  (MAINhDlg  &&  IsDialogMessage (MAINhDlg, pMsg) ) 
return  TRUE; 

//  Translates  keystrokes  so  client  area  works  as  a dialog  box 
if  (hClient  &&  IsDialogMessage (hClient , pMsg) ) 
return  TRUE; 

return  FALSE;  //  No  special  key  input 

} 


//  Registers  the  class  for  the  main  window 
BOOL  BLDMainRegCl a ssDef (HINSTANCE  hinstance) 


WNDCLASS  WndClass; 


WndClass . style 


CS_DBLCLKS; 

BLDMainWndProc; 

0; 

0; 

hinstance; 


WndClass . IpfnWndProc 
WndClass , cbClsExtra 
WndClass . cbWndExtra 
WndClass . hinstance 
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WndClass . hicon 
WndClass . hCursor 
WndClass . hbrBackground 
WndClass . IpszMenuName 
WndClass . IpszClassName 


Loadicon (hinstance, "PCI" ) ; 
LoadCursor (NULL, IDC_ARROW) ; 
(HBRUSH) (C0L0R_WIND0W+1) ; 
NULL; 

"BLDEAMAT42"; 


return  RegisterClass (SWndClass)  ; 
} 


BOOL  BLDMainExitClassDef 0 
{ 

return  TRUE; 

} 


//  Creates  the  main  window 
HWND  BLDMainCreateWndDef ( ) 

{ 

HWND  hWnd;  / / window  handle 

int  coordinate [4 ] ; //  Coordinates  of  main  window 

coordinate [ 0 ] =-4 ; 
coordinate [1] =-4; 
coordinate [2] =648; 
coordinate [ 3 ] =4  8 8 ; 

hWnd  = CreateWindowEx ( 0 , II  window  Extended  style 

"BLDEAMAT42" , //  window  class  registered  earlier 

"EAMATE  V4.2",  //  window  caption 

WS_THICKFRAME  | WS_CLIPCHILDREN  | WS_MINIMIZEBOX  | WS_OVERLAPPED, 
//  window  style 


coordinate [0]  , 

// 

X position 

coordinate [1 ] , 

// 

y position 

coordinate [2]  , 

// 

width 

coordinate [3]  , 

// 

height 

0, 

// 

parent  handle 

0, 

// 

menu  or  child  ID 

hinst , 

// 

instance 

(LPSTR)NULL) ; 

// 

additional  info 

return  hWnd; 

} 

II  ************************************************************* 

//  CUSTOM  MESSAGE  PROCESSING  FOR  MAIN  WINDOW 

II  ************************************************************* 

LRESULT  BLDDefWindowP roc (HWND  hWnd,UINT  message, WP ARAM  wParam,  LPARAM  iParam) 
{ 

LRESULT  iReturn; 

IReturn  = 0 ; 

if (BLDWndMsgFilter (hWnd, message, wParam,  IParam, 0, SlReturn) ) 
return  IReturn; 

switch  (message) 

{ 


case  WM  SIZE: 
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BLDSizeToolBars (hWnd, message,  (int)wParam,  (int) LOWORD (IParam) , (int ) HIWORD (iParam)  , F 

ALSE) ; 

break; 

case  WM_CREATE: 

MainhWnd=hWnd; 

BLD_MAINClFunc (hWnd, message, wParam, IParam) ; 
break; 

case  WM_M0VE: 

BLDClientMove (hWnd) ; 
break; 

case  WM_SETFOCUS: 

BLDSetClientFocus (hWnd) ; 
break; 
default : 

//  Pass  on  message  for  default  processing  by  Windows 
return  DefWindowProc (hWnd, message, wParam, IParam) ; 
break; 

} 

return  FALSE;  //  Returns  FALSE  if  not  processed  by  Windows 

} 

II  ************************************************************* 

//  PROCESSES  ALL  MENU  ITEM  SELECTIONS 

II  ************************************************************* 

BOOL  BLDMenuCommand (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

switch (LOWORD (wParam) ) 

{ 

//  Processing  of  linked  menu  items  in  menu:  GENERIC 
default: 

return  FALSE;  //  Not  processed  by  this  function. 

} 

return  TRUE;  //  Processed  by  this  function. 

} 

II  ************************************************************* 

//  PROCESSES  HELP  FOR  MENU  ITEMS 

II  ************************************************************* 

BOOL  BLDMenuHelp ( HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

switch (LOWORD (wParam) ) 

{ 

default : 

PostMessage (hWnd, wHelpMessage, 0 , OL) ; 

return  FALSE;  //  Processed  as  help  for  window. 

} 

return  TRUE;  //  Processed  by  this  function. 

} 

II  ************************************************************* 

//  ’ WINDOW  & DIALOG  BOX  COMMON  PROCESSING 

II  ************************************************************* 
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BOOL  BLDWndMsgFilter (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  iParam, 

DWORD  dwHelpId, LRESULT  *plRetval) 

{ 

return  BLDHelpFilter (hWnd, message, wParam, iParam, dwHelpId, plRetval,  FALSE) 

} 


BOOL  BLDDlgMsgFilter (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam, 

int  iWndType , DWORD  dwHelpId, BOOL  *pbRetval) 

{ 

LRESULT  iReturn; 

BOOL  bRet ; 

IReturn  = OL; 

if (message==wBLDWindowType) 

{ 

* ( (LPINT) IParam) =iWndType; 

*pbRetval  =TRUE; 

return  TRUE; 

} 

bRet  = BLDHelpFilter (hDlg, message, wParam, IParam, dwHelpId, &lReturn, TRUE) 
*pbRetval  = (BOOL) IReturn; 
return  bRet; 

} 


BOOL  BLDGetHelpFileName (char  *szWinHelpFile) 

{ 

OBSTRUCT  of; 

char  path [BLD_MAXPATH] ; 

int  len; 

char  *pStr; 

GetModuleFileName (hlnst,path, sizeof (path) ) ; 
len=lstrlen (path) ; 

for  (pStr=&path [len-1 ] ;pStr>path; — pStr) 

{ 

if  (*pStr=='\\' ) 

{ 

pStr++; 

Istrcpy (pStr, "EAMAT42 . HLP" ) ; 
if  (OpenFile(path,&of,OF_EXIST) !=-l) 
{ 

Istrcpy (szWinHelpFile, path) ; 
return  TRUE; 

} 

else 

goto  RET_DEF; 

} 

} 

RET_DEF : 

Istrcpy (szWinHelpFile, "EAMAT42 . HLP" ) ; 
return  TRUE; 

} 


II  ************************************************************* 

//  FUNCTION  FOR  SWITCHING  MENU  SET 

II  ************************************************************* 
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BOOL  BLDSwitchMenu (HWND  hWnd,char  *pTemplateName) 

{ 

HMENU  hMenul , hMenu, hSubMenu; 

DWORD  style; 

hSubMenu  = 0; 

style  = GetWindowLong(hWnd,GWL_STYLE) ; 

if  ( (style  & WS_CHILD)  ==  WS_CHIIiD)  //  Called  from  control  in  main  window 

{ 

hWnd=GetParent (hWnd) ; 
if  (!hWnd) 

return  FALSE; 

style  = GetWindowLong (hWnd, GWL_STYLE) ; 

if ({style  & WS_CHILD)  ==  WS_CHILD)  //  No  menu  in  a WS_CHILD  window, 
return  FALSE; 

} 

if ((style  & WS_CAPTION)  !=  WS_CAPTION)  //  No  menu  if  no  caption, 
return  FALSE; 

hMenul  = GetMenu (hWnd) ; 

hMenu  = BLDLoadMenu (hWnd, pTemplateName, &hSubMenu) ; 
if  (! hMenu) 

{ 

BLDDisplayMessage (hWnd, BLD_CannotLoadMenu,  pTemplateName, 

MB_OK  1 MB_ICONASTERISK) ; 

return  FALSE; 

} 

if  ( ! SetMenu (hWnd, hMenu) ) 
return  FALSE; 
if  (hMenul) 

DestroyMenu (hMenul)  ; 

DrawMenuBar (hWnd)  ; 
return  TRUE; 

} 


//  Code  to  load  menu  and  add  bitmaps  and  accelerators 
HMENU  BLDLoadMenu (HWND  hWnd, char  *pTemplateName, HMENU  *phSubMenu) 
{ 

HMENU  hMenu; 

*phSubMenu  = 0; 

hMenu  = LoadMenu (hinst , pTemplateName) ; 

if { ! hMenu) 

return  FALSE; 


return  hMenu; 

} 
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//  Filename:  ERROR. WMC 

//  "EAMAT42"  Generated  by  WindowsMAKER  Professional. 

//  Author:  Laura  L.  Downey 

// 

II  *********************************************************************** 

//Do  not  add  code  here.  Add  code  in  the  .C  file. 

// 

//  This  file  is  maintained  by  WindowsMAKER  Professional. 

//  As  you  make  changes  in  your  application  using  WindowsMAKER  Professional, 
//  this  file  is  automatically  updated,  therefore  you  never  modify  this  file. 

// 

// 

// 

//  For  more  information, 

//  see  the  section  "How  code  is  generated"  in  the  documentation. 

// 

II  *********************************************************************** 

It 


II  *************************************************************** 

//  Modal  Dialog  Box:  EINERROR 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_EINErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_EINErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox  (hinst , (LPSTR)  (S2DlgName?szDlgName: "EINERROR") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "EINERROR") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_EINErrDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wP a ram, IParam, BLDDLGMODAL, 0 , SbRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 
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//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  {lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "NOTE") ; 
return  TRUE; 
break; 
default: 

if  (BLDDrawItem  (hDlg,  IpDrawItem)  ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  QMSG 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_QueryMessageDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_QueryMessageDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName: "QMSG") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_Cannot Create, (szDlgName?szDlgName: "QMSG") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_QueryMessageDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL 


bRet ; 
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bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, iParam, BLDDLGMODAL, 0, &bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam) ; 

hCtrl  = (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam)  ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

if (! hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam,  IParam)  ) 
return  TRUE; 

} ■ ’ • 
switch (wid) 

{ 

case  2: 

switch (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg, 2) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM; 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  101: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "BOXES", TRUE) ; 
return  TRUE; 
break; 
case  102: 
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if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "BOXES", TRUE) ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem(hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  ************************************** ************************* 

//  Modal  Dialog  Box:  NMSG 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_NMSGDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_NMSGDlgProc,hInst) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName : "NMSG") , 

hWnd, IpProc)  ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "NMSG") , 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_NMSGDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam,  IParam,  BLDDLGMODAL, 0 , &bRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) IParam; 
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if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCorranand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) iParam; 
switch (IpDrawItem- >CtlID) 

{ 

case  101: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "FELLIPSE")  ; 
return  TRUE; 
break; 
case  102: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "FELLIPSE") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


II  *************************************************************** 

//  Modal  Dialog  Box:  QUERYERROR 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_QueryErrDlgFuncDef (HWND  hWnd,char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_QueryErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (S2DlgName?S2DlgName: "QUERYERROR") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (s2DlgName?S2DlgName : "QUERYERROR") 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 


error . vnnc 


Wed  Mar  2 14:13:56  1994 


6 


BOOL  BLD_QueryErrDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, &bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND){UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP")  ; 
return  TRUE; 
break; 
case  105: 

if  (IpDrawIt  em- > i t emAc t i o n==OD A_D RAWENT I RE ) 
if  ( IpDrawItem- >CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP")  ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 
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II  *************************************************************** 

//  Modal  Dialog  Box:  BLANKETERROR 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_BlanketErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_BlanketErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgNamePszDlgName : "BLANKETERROR" ) ^ 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_Cannot Create, (szDlgName?szDlgName : "BLANKETERROR") 
MB_OK  i MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_BlanketErrDlgDefault (HWND  hDlg, UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0 , &bRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
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break; 
case  105: 

i f ( IpD  r awl  t em-->i  t eitiAc  t i on==ODA_DRAWENT  I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 
BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem(hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 


break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  PWERROR 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_PWErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_PWErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName: "PWERROR") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "PWERROR") , 
MB_OK  1 MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_PWErrDlgDe fault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND : 

{ 

HWND  hCtrl; 
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//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "NOTE") ; 
return  TRUE; 
break; 
default : 

if  (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


j j *************************************************************** 

//  Modal  Dialog  Box:  YEAR_ERR 

j j *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_Year_ErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_Year_ErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox  (hinst , (LPSTR)  (szDlgName?szDlgName : "YEAR_ERR" ) , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "YEAR_ERR") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_Year_ErrDlgDe fault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL 


bRet ; 
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bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0,&bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam,lParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IPar  am; 
switch (IpDrawItem- >CtlID) 

{ 

case  101: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "NOTE")  ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem(hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


II  *************************************************************** 

//  Modal  Dialog  Box:  SYSERR 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_SysErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC 
int 


IpProc; 
ReturnValue ; 
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IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_SysErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName: "SYSERR") , 

hWnd, IpProc)  ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate,  (szDlgNaine?szDlgName : "SYSERR") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_SysErrDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0,'&bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch  (lpDrawItem->CtlID) 

{ 

case  103: 

if  (IpDrawIt  em- > i t emAc t i o n==OD A_DRAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP")  ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
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break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  BLANKERR 

II  *************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_BlankErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_BlankErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName: "BLANKERR") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  {ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_Cannot Create, (szDlgName?szDlgName : "BLANKERR") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_BlankErrDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 
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case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 


IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 
BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 
BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 


default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  MISSINGFILE 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_MissingFileDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance  ( (FARPROC) BLD_MissingFileDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName: "MISSINGFILE") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "MISSINGFILE") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_MissingFileDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 
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switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) iParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam,  IParam)  ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpD r awl tern; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IP a ram; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP" ) ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


II  *************************************************************** 

//  Modal  Dialog  Box:  QUERYTXT 

II  ********************************************** ***************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_QueryTxtDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC 


IpProc; 
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int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_QueryTxtDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (S2DlgName?s2DlgName: "QUERYTXT") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (S2DlgName?S2DlgName : "QUERYTXT") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_QueryTxtDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0,  sbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND : 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP")  ; 
return  TRUE; 
break; 
default : 
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if (BLDDrawItem(hDlg, IpDrawItem)  ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

II  Modal  Dialog  Box:  ERRORFILE 

! ! *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_ErrorFileDlgFuncDef (HWND  hWnd, char  *S2DlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC)  MakeProcInstance ( (FARPROC) BLD_ErrorFileDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName : "ERRORFILE") ^ 

hWnd, IpProc)  ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage  (hWnd, BLD_CannotC'reate/  (szDlgName?szDlgName : "ERRORFILE") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_ErrorFileDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wP a ram, IParam, BLDDLGMODAL, 0 , SbRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) IParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 
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break; 


case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 


IpDrawItem  = (LPDRAWITEMSTRUCT) iParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
if  (IpDrawIt  em->Ct 1 Type==ODT_BUTTON ) 
BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
case  105: 

if  (IpDrawIt  em- > i t emAc t i o n==OD A_D RAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 
BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 


default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


/ ! *************************************************************** 

//  Modal  Dialog  Box:  NULLPTR 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_NULLPtrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_NULLPtrDlgProc, hinst) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName: "NULLPTR") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "NULLPTR") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_NULLPtrDlgDef ault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 


bRet 


FALSE; 


//  Default  return  value  if  not  processed 


error . vmtc 


Wed  Mar  2 14:13:56  1994 


18 


if (BLDDlgMsgFilter (hDlg, message, wParam,  iParam, BLDDLGMODAL, 0, &bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  ( BLDMenuCommand (hDlg, mess age, wP a ram, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (IpDrawItem- >CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpDrawItem- >CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP")  ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


/ / *************************************************************** 
//  Modal  Dialog  Box:  DATAERR 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_DataErrDlgFuncDef (HWND  hWnd, char  *S2DlgName) 


error . wmc 


Wed  Mar  2 14:13:56  1994 


19 


{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_DataErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName: "DATAERR") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BIiD_CannotCreate, (szDlgName?szDlgName : "DATAERR") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_DataErrDlgDefault (HWND  hDlg^UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, &bRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r awl t em->Ct 1 Type==ODT_BUTTON ) 

BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
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break; 
default : 

if  (BLDDrawItera(hDlg,  IpDrawItem)  ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  ************************* ************************************** 

//  Modal  Dialog  Box:  DETAILTXT 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_DFileErrDlgFuncDef (HWND  hWnd, char  *S2DlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance { (FARPROC) BLD_DFileErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (S2DlgName?szDlgName: "DETAILTXT") r 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_Cannotereate, (szDlgNameTszDlgName : "DETAILTXT") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_DFileErrDlgDefault (HWND  hDlg.UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

/ / Extracting  data  from  message 
hCtrl  = (HWND) (UINT) IParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand(hDlg,message,wParam, IParam) ) 
return  TRUE; 
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} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDr  awl  tern; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IP a ram; 
switch (IpDrawItem- >CtlID) 

{ 

case  103: 

if  ( IpDrawI tem->itemAct ion==ODA_DRAWENTIRE ) 
i f ( IpD  rawl t em->Ct 1 Type==ODT_BUTTON ) 

BLDDrawIcon (IpDrawItem, "STOP" ) ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP")  ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


j j *************************************************************** 

//  Modal  Dialog  Box:  NOMORE 

I ! *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_NoMoreMatchesDlgFuncDef (HWND  hWnd,char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_NoMoreMatchesDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName : "NOMORE") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "NOMORE") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_NoMoreMatchesDlgDef ault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL 


bRet ; 
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bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, iParam, BLDDLGMODAL, 0,&bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitCtrlFont (hDlg, 107, -19, 0, 0, 0, 700, 0, 0, 0, 0, 3, 2, 1, 34, -Arial") 
break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam,  iParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r aw 1 1 em- >C 1 1 Type==ODT_BUTTON ) 

BLDDrawIcon (IpDrawItem, "NOTE")  ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

case  WM_DESTROY: 

BLDExitCtrlFont (hDlg,  107)  ; 
break; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX: 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN : 
case  WM_CTLCOLORDLG: 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 
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{ 

HWND  hCtrl; 

#ifdef  WIN32 

hCtrl  = (HWND) IP a ram; 

#else 

hCtrl  = (HWND) LOWORD (IParam) ; 

#endif 

switch (GetDlgCtrllD (hCtrl) ) 

{ 

case  107: 

SetTextColor ( (HDC) wParam, RGB (0,0,128) ) ; 

SetBJcMode  ( (HDC)  wP  a ram,  OPAQUE)  ; 

return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) ; 

break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  MRNERR 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_MRNErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_MRNErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (s2DlgName?szDlgName: "MRNERR") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "MRNERR") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_MRNErrDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 
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case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if{!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCorranand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM__DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  ^ (LPDRAWITEMSTRUCT) IParam; 
switch (IpDrawItem- >CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType^==ODT__BUTTON) 

BLDDrawIcon (IpDrawItem, "NOTE") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  NOMATCH 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_MatchErrDlgFuncDef (HWND  hWnd,char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD__MatchErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (S2DlgName?szDlgName: "NOMATCH") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD__CannotCreate, (szDlgNamePszDlgName: "NOMATCH") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


// 


Default  dialog  box  procedure 
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BOOL  BLD_MatchErrDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL,  0 , SbRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if{!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (IpDrawItem- >CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
i f ( IpDrawItem- >Ct 1 Type==ODT_BUTTON ) 

BLDDrawIcon (IpDrawItem, "STOP" ) ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP" ) ; 
return  TRUE; 
break; 
default : 

if  (BLDDrawItem (hDlg, IpDrawItem)  ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet; 

} 


//  No  explicit  return  - return  default 
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II  *************************************************************** 

II  Modal  Dialog  Box:  EINORSEQ 

II  *************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_EINorSeqErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_EINorSeqErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName : "EINORSEQ" ) / 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "EINORSEQ") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_EINorSeqErrDlgDef ault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "NOTE") ; 
return  TRUE; 
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break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


11  *************************************************************** 

//  Modal  Dialog  Box:  SEQERR 

j j *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_SeqErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_SeqErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName: "SEQERR”) ^ 

hWnd, IpProc) ; 

FreeProelnstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "SEQERR") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_SeqErrDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wPa ram, IParam, BLDDLGMODAL, 0 , SbRet ) ) 
return  bRet ; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND : 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) IParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 
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} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) iParam; 
switch  (lpDrawIteia->CtlID) 

{ 

case  103: 

if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
i f ( IpD  r awl t em->Ct 1 Type==ODT_BUTTON ) 

BLDDrawIcon (IpDrawItem, "NOTE")  ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

}• 


II  *************************************************************** 

//  Modal  Dialog  Box:  HEADERTXT 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_HFileDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_HFileDlgProc, hinst) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName: "HEADERTXT") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "HEADERTXT") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_HFileDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0,&bRet) ) 
return  bRet; 


switch (message) 
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{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IP a ram; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  rawl t em->Ct lType==ODT_BUTTON ) 

BLDDrawIcon (IpDrawItem, "STOP" ) ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP")  ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


II  *************************************************************** 

//  Modal  Dialog  Box:  USERERR 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_UserNumErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC 
int 


IpProc; 
ReturnValue ; 
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IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_UserNximErrDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName: "USERERR") , 

hWnd, IpProc)  ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName: "USERERR") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_UserNuinErrDlgDefault (HWND  hDlg^UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL,  0, &bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  raw I tern- >C 1 1 Type==OD  T_BUTTON ) 

BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem)  ) 
return  TRUE; 
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break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  STATOPEN 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_StatOpenDlgFuncDef (HWND  hWnd,  char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_StatOpenDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName : "STATOPEN") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate/ (szDlgName?szDlgName : "STATOPEN") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_S t at OpenDlgDe fault (HWND  hDlg^UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam,  IParam)  ) 
return  TRUE; 

} 

} 

break; 
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case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 


IpDrawItem  = (LPDRAWITEMSTRUCT) iParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItein->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r aw 1 1 em- >C 1 1 Ty pe==OD T_BUT TON ) 
BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 
BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem(hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 


default : 
break; 

} 

return  bRet;  //No  explicit  return  - return  default 

} 


j j *************************************************************** 

//  Modal  Dialog  Box:  STATEMPTY 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_StatEmptyDlgFuncDef (HWND  hWnd,char  *S2DlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_StatEmptyDlgProc, hinst) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName: "STATEMPTY") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "STATEMPTY") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_StatEmptyDlgDef ault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  / / Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam,  IParam, BLDDLGMODAL, 0,&bRet) ) 
return  bRet; 
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switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) IParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (IpDrawItem- >CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r awl t em- >C 1 1 Type==OD  T_BUTTON ) 

BLDDrawIcon (IpDrawItem, "STOP" ) ; 
return  TRUE; 
break; 
case  105: 

if  (IpDrawIt  em- >i t emAc t i on==OD A_DRAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem,  "STOP") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


j I *************************************************************** 

II  Modal  Dialog  Box:  STATWOPEN 

j j *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_StatWOpenDlgFuncDef (HWND  hWnd,char  *szDlgName) 

{ 

DLGPROC 


IpProc; 
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int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_StatWOpenDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName : ”STATWOPEN" ) , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "STATWOPEN") , 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_StatWOpenDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) IParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r aw 1 1 em->Ct 1 Type==ODT_BUTTON ) 

BLDDrawIcon (IpDrawItem,  "STOP") ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem,  "STOP") ; 
return  TRUE; 
break; 
default : 
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if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

II  Modal  Dialog  Box:  STATWRITE 

II  *************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_StatWriteErrDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_StatWriteErrDlgProc, hinst) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName : "STATWRITE" ) , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate,  (szDlgName?szDlgName : "STATWRITE" ) , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_StatWriteErrDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 
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break; 

case  WM_DRAWITE1M: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT)lParam; 
switch (IpDrawItem- >CtlID) 

{ 

case  103: 

if  (1 pD  r a w 1 1 em- > i t emAc tie n==OD A_D RAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "STOP")  ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (IpDrawIt  em->Ct 1 Type==OD  T_BUTTON ) 

BLDDrawIcon (IpDrawItem, "STOP") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem(hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 
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//  Filename:  PRINT. WMC 

//  "EAMAT42"  Generated  by  WindowsMAKER  Professional. 

//  Author:  Laura  L.  Downey 

// 

II  *********************************************************** ************ 

//  Do  not  add  code  here.  Add  code  in  the  .C  file. 

// 

//  This  file  is  maintained  by  WindowsMAKER  Professional. 

//  As  you  make  changes  in  your  application  using  WindowsMAKER  Professional, 
//  this  file  is  automatically  updated,  therefore  you  never  modify  this  file. 
// 

// 

// 

//  For  more  information, 

//  see  the  section  "How  code  is  generated"  in  the  documentation. 

// 

II  *********************************************************************** 

// 


! ! *************************************************************** 

//  Modal  Dialog  Box:  PBLANKET 

! ! *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_PrintBlanketDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_PrintBlanketDlgProc, hinst ) ; 
ReturnValue  = DialogBox  (hinst,  (LPSTR)  (szDlgNameTszDlgName : "PBLANKET") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate,  (szDlgName?szDlgName : "PBLANKET" ) , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_PrintBlanketDlgDe fault (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0 , SbRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND : 

{ 

WORD  wid; 

WORD  notification; 
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HWND  hCtrl; 

//  Extracting  data  from  message 
wid  = LOWORD (wParam) ; 

hCtrl  = (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam)  ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

switch (wId) 

{ 

case  IDCONT : 

switch (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg, IDCONT) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (IpDrawIt  em- >C 1 1 Ty pe==OD  T_BUT TON ) 

BLDDrawBitmap (IpDrawItem, "CASTLE", TRUE) 
return  TRUE; 
break; 
case  104: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  106: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpDrawItem- >CtlType==ODT__BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE" , TRUE) 
return  TRUE; 
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break; 
case  107: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( lpDrawItein->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE", TRUE) 
return  TRUE; 
break; 
case  108: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
i f ( IpDrawI t em->Ct 1 Type==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "CASTLE" , TRUE) 
return  TRUE; 
break; 
case  109: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE", TRUE) 
return  TRUE; 
break; 
case  110: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE" , TRUE) 
return  TRUE; 
break; 
case  111: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE" , TRUE) 
return  TRUE; 
break; 
case  112: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE" , TRUE) 
return  TRUE; 

. break; 
case  113: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  114: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  115: 

if  (IpDrawIt  em- > i t emAc t i on==OD A_D RAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE", TRUE) 
return  TRUE; 
break; 
case  116: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE", TRUE) 
return  TRUE; 
break; 
case  117: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT  BUTTON) 
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BLDDrawBitmap  (IpDrawItem,  "CASTLE",  TRUE) 
return  TRUE; 
break; 
case  118: 

if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE", TRUE) 
return  TRUE; 
break; 
case  119: 

if  (IpDrawIt  em- > i t emAc t i o n==OD A_D RAWENT I RE ) 
if  ( IpDrawIt em->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE", TRUE) 
return  TRUE; 
break; 
case  120: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (IpDrawItem- >CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE", TRUE) 
return  TRUE; 
break; 
case  121: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r aw 1 1 em->C 1 1 Type==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  122: 

if  (lpDrawItem“>itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r awl t em->Ct 1 Type==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "CASTLE", TRUE) 
return  TRUE; 
break; 
case  123: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (IpDrawIt  em->C 1 1 Type==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  124: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType”ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "CASTLE", TRUE) 
return  TRUE; 
break; 
case  125: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  126: 

if  (IpDrawIt  em- > i t emAc t i o n==ODA_D RAWENT I RE ) 
if  (lpDrawItem->CtlType"ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  127: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  128: 
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if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r aw 1 1 em-  >C 1 1 Type==OD T_BUT TON ) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) ; 
return  TRUE; 
break; 
case  129: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r awl t em->Ct 1 Type==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) ; 
return  TRUE; 
break; 
case  130: 

if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
if  ( IpD  r aw 1 1 em->Ct 1 Type==OD  T_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ARCADE" , TRUE) ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 


break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


II  ************************************************** ************* 

//  Modal  Dialog  Box:  PEDETAIL 

/ ! *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_PrintEmpDetailDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_PrintEmpDetailDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName : "PEDETAIL" ) , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "PEDETAIL") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_PrintEmpDetailDlgDef ault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, &bRet) ) 
return  bRet; 


switch (message) 
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{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 


case  WM_COJ®dAND : 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) IParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 


case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  ==  (LPDRAWITEMSTRUCT) IP a ram; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction=-ODA__DRAWENTIRE) 
if  (IpDrawIt  em-  >C  1 1 Type^=OD  T__BUT  TON ) 

BLDDrawBitmap'dpDrawItem, "ARCADE” , TRUE) ; 
return  TRUE; 
break; 
case  104: 

if  (lpDrawItem->itemAction=— ODA__DRAWENTIRE) 
if  (lpDrawItem->CtlType“ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE" , TRUE) ; 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction-=ODA__DRAWENTIRE) 
if  (lpDrawItem->CtlType“ODT__BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) ; 
return  TRUE; 
break; 
case  106: 

if  (lpDrawItem->itemAction~=ODA_DRAWENTIRE) 
if  (IpDrawItem- >CtlType«ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) ; 
return  TRUE; 
break; 
case  107: 

if  (lpDrawItem->itemAction==ODA__DRAWENTIRE) 
if  (lpDrawItem->CtlType“ODT__BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) ; 
return  TRUE; 
break; 
case  108: 

if  (lpDrawItem->itemAction=~ODA__DRAWENTIRE) 
if  (lpDrawItem->CtlType^-ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) ; 
return  TRUE; 
break; 
case  109: 
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if  (lpDrawItem->it  emAc  t i o n==OD A_D RAWE NT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  110: 

i f ( IpDrawI t em->i t emAct ion==ODA_DRAWENTIRE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  111: 

if  ( IpDrawI tem->it emAct ion==ODA_DRAWENTIRE) 
if  ( IpD  r aw 1 1 em-  >C 1 1 Type==OD  T_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  112: 

if  ( IpDrawI tem->it emAct ion==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  113: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpDrawI tem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE" , TRUE) 
return  TRUE; 
break; 
case  114: 

if  (IpDrawIt  em- > i t emAct i O n==OD A_D  RAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  115: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE" , TRUE) 
return  TRUE; 
break; 
case  116: 

if  (IpDrawIt  em- >itemActi o n==OD A_D RAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE", TRUE) 
return  TRUE; 
break; 
case  117: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (IpDrawIt  em- >Ct lType==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ARCADE" , TRUE) 
return  TRUE; 
break; 
case  118: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (IpDrawIt  em- >Ct 1 Type==ODT_BUT  TON ) 

BLDDrawBitmap (IpDrawItem, "ARCADE" , TRUE) 
return  TRUE; 
break; 
case  119: 

if  ( IpD r awl t em->it emAct ion==ODA_DRAWENTIRE) 
if  ( IpDrawI tem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCADE" , TRUE) 
return  TRUE; 


print . wzoc 


Wed  Mar  2 14:14:08  1994 


8 


break; 
case  120: 

if  ( IpD  r awl  t em->i  t emAc  t i on==ODA__DRAWENTI  RE ) 
if  (lpDrawItem->CtlType==ODT__BUTTON) 

BLDDrawBitmap (IpDrawItem,  "ARCADE", TRUE) ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem{hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 


default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  PHDETAIL 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_PrintHeaderDetailDlgFuncDef (HWND  hWnd, char  *s2DlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD__PrintHeaderDetailDlgProc, hinst)  ; 
ReturnValue  - DialogBox (hinst, (LPSTR) (szDlgNamePszDlgName : "PHDETAIL") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue— =-l ) 

BLDDisplayMessage (hWnd, BLD__Cannot Create,  (szDlgNameTszDlgName : "PHDETAIL")  , 
MB__OK  1 MB_ICONHAND)  ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_PrintHeaderDetailDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0 , SbRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 
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//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) iParam; 
switch (IpDrawItem- >CtlID) 

{ 

" case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS", TRUE) 
return  TRUE; 
break; 
case  104: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS " , TRUE ) 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON)  ■ 

BLDDrawBitmap (IpDrawItem, "RIVETS" , TRUE) 
return  TRUE; 
break; 
case  106: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
i f ( IpD  r awl t em->Ct 1 Type==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "RIVETS" , TRUE) 
return  TRUE; 
break; 
case  107: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS " , TRUE ) 
return  TRUE; 
break; 
case  108: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS", TRUE) 
return  TRUE; 
break; 
case  109: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS" , TRUE) 
return  TRUE; 
break; 
case  110: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r aw 1 1 em-  >C 1 1 Type==OD  T_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "RIVETS" , TRUE) 
return  TRUE; 
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break; 
case  111: 

if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
if  ( IpD  r aw 1 1 em->C 1 1 Type==OD  T_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "RIVETS" , TRUE) ; 
return  TRUE; 
break; 
case  112: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS", TRUE) ; 
return  TRUE; 
break; 
case  113: 

if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS", TRUE) ; 
return  TRUE; 
break; 
case  114: 

if  {lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS" , TRUE) ; 
return  TRUE; 
break; 
case  115: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS", TRUE) ; 
return  TRUE; 
break; 
case  116: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (IpDrawItem- >CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS" , TRUE) ; 
return  TRUE; 
break; 
case  117: 

if  (lpDrawItem->itemAction“ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS" , TRUE) ; 
return  TRUE; 
break; 
case  118: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r awl t em->C 1 1 Type==OD  T_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "RIVETS", TRUE) ; 
return  TRUE; 
break; 
case  119: 

if  (lpDrawItem->itemAction===ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "RIVETS", TRUE) ; 
return  TRUE; 
break; 
case  120: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r awl t em->Ct 1 Type==OD  T_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "RIVETS" , TRUE) ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem(hDlg, IpDrawItem) ) 
return  TRUE; 
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} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 
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} 


II  *************************************************************** 

II  Modal  Dialog  Box:  PINFO 

II  *************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_Function5DlgFuncDef (HWND  hWnd,char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_Function5DlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName : "PINFO" ) ^ 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "PINFO") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_Function5DlgDef ault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0,&bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 


case  WM_COMMAND: 

WORD 

wId; 

WORD 

notification; 

HWND 

hCt  r 1 ; 

//  Extracting  data  from  message 

wid 

= LOWORD (wParam)  ; 

hCtrl 

= (HWND) (UINT) IParam, 

#ifdef 

WIN32 

#else 

notification 

= HIWORD (wParam) ; 

#endif 

notification 

= HIWORD (IParam) ; 
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if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCoiranand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  101: 

switch (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg, 101) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) iParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r awl t em- >Ct 1 Type==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  104: 

if  ( IpD  r awl t em->i t emAc t i on==ODA_DRAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  105: 

i f ( IpD  raw 1 1 em- >i t emAc t i o n==ODA_DRAWENT I RE ) 
if  ( IpDrawItem- >CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  106: 

if  (IpDrawIt  em- > i t emAc t i o n==OD A_DRAWENT I RE ) 
if  (IpDrawIt  em- >Ct 1 Type==OD T_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  107: 

if  (IpDrawIt  em- >i t emAc t i o n==ODA_DRAWENT I RE ) 
if  ( IpD  raw 1 1 em->C 1 1 Type==OD  T_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  108: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 
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BLDDrawBitmap (IpDr awl tern, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  109: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  110: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE" , TRUE) 
return  TRUE; 
break; 
case  111: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  112: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType===ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  113: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
i f ( IpD  r awl t em->Ct 1 Type==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ARGYLE" , TRUE) 
return  TRUE; 
break; 
case  114: 

if  ( lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  115: 

if  (lpDrawItem->it  emA  c t i o n==OD A_D RAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  116: 

if  (lpDrawItem->itemAction==ODA_DBAWENTIRE) 
if  (IpDrawItem- >CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE" , TRUE) 
return  TRUE; 
break; 
case  117: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  118: 

if  ( IpD  r aw 1 1 em- >i t emAc t i on==ODA_D RAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE", TRUE) 
return  TRUE; 
break; 
case  119: 
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if  (lpDrawItem->iteinAction==ODA__DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE”, TRUE) ; 
return  TRUE; 
break; 
case  120: 

if  (lpDrawItem->itemAction~ODA__DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARGYLE" , TRUE) ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem(hDlg, IpDrawItem)  ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  PTOTALS 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_TotNowPrintDlgFuncDef (HWND  hWnd,char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD__TotNowPrintDlgProc, hinst) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?S2DlgName: "PTOTALS") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue=”-l ) 

BLDDisplayMessage {hWnd, BLD__Cannot Create, (szDlgNamePszDlgName : "PTOTALS") , 
MB__OK  I MB__ICONHAND)  ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_TotNowPrintDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 
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case  WM_COMMAND: 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam) ; 

hCtrl  = (HWND) (UINT) IParam; 

fifdef  WIN32 

notification  = HIWORD (wParam) ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

if(!hCtrl)  //  Menu  input  or  OR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  101: 

switch (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg, 101) ; 
return  TRUE; 
break; 
default : 
break; 

■} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ • 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  103: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG", TRUE) 
return  TRUE; 
break; 
case  104: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r awl t em- >C t lType==OD  T_BUTTON ) 

BLDDrawBitmap  (IpDrawItem, "ZIGZAG" , TRUE) 
return  TRUE; 
break; 
case  105: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) 
return  TRUE; 
break; 
case  106: 
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if  (IpDrawIt  em- > i t emAc t i o n==OD A_DRAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG”, TRUE) 
return  TRUE; 
break; 
case  107: 

if  (IpDrawIt  em- > i t emAc t i o n==OD A_DRAWENT I RE ) 
i f ( IpD  r awl tern- >C 1 1 Type==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) 
return  TRUE; 
break; 
case  108: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG", TRUE) 
return  TRUE; 
break; 
case  109: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) 
return  TRUE; 
break; 
case  110: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r aw 1 1 em->C 1 1 Type==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) 
return  TRUE; 
break; 
case  111: 

if  (IpDrawIt  em- > i t emAc t i o n==OD A_D RAWENT I RE ) 
if  ( IpD  r aw 1 1 em->Ct 1 Type-=ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG", TRUE) 
return  TRUE; 
break; 
case  112: 

if  (lpDrawItem->itemAction=-ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlTyp€==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) 
return  TRUE; 
break; 
case  113: 

if  (lpDrawItem->itemAction-=sODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType-=ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG", TRUE) 
return  TRUE; 
break; 
case  115: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (IpDrawIt  em->Ct 1 Type==ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) 
return  TRUE; 
break; 
case  116: 

if  (IpDrawIt  em- > i t emAc t i o n=-OD A_D RAWENT I RE ) 
if  (IpDrawIt  em- >C 1 1 Type^=ODT_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG", TRUE) 
return  TRUE; 
break; 
case  117: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) 
return  TRUE; 
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break; 
case  118: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) ; 
return  TRUE; 
break; 
case  119: 

if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) ; 
return  TRUE; 
break; 
case  120: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) ; 
return  TRUE; 
break; 
case  121: 

if  (lpDrawItera->iteinAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ZIGZAG" , TRUE) ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


II  *************************************************************** 

//  Modal  Dialog  Box:  NCOPY 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_GetN\amCopyDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_GetNumCopyDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName: "NCOPY") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  {ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate,  (szDlgName?szDlgName: "NCOPY") , 
MB_OK  i MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_GetNumCopyDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 
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BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg,  message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM__INITDIALOG  is  TRUE 

BLDInitSolidBrush{hDlg,RGB(192,192,192) ) ; 

BLDInitSolidBrush (GetDlgItem(hDlg, 103) , RGB (192, 192, 192)  ) ; 
break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  ^ (HWND) (UINT) IParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 

} 

break; 

break; 

case  WM_DESTROY: 

BLDExitBrush (hDlg)  ; 

BLDExitBrush (GetDlgltem (hDlg,  103) ) ; 
break; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX : 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN: 
case  WM__CTLCOLORDLG: 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 

{ 

HWND  hCtrl; 

#ifdef  WIN32 

hCtrl  = (HWND) IParam; 

#else 


print . wine 


Wed  Mar  2 14:14:08  1994 


19 


hCtrl  = (HWND) LOWORD (IParam) ; 

#endif 

tifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC) wParam) ; 

#else 

if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC) wParam) ; 

#endif 

switch (GetDlgCtrllD (hCtrl)  ) 

{ 

case  103: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet; 

} 


//  No  explicit  return  - return  default 
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//  Filename:  SERVICE. WMC 

//  "EAMAT42"  Generated  by  WindowsMAKER  Professional. 

//  Author:  Laura  L.  Downey 

// 

II  *********************************************************************** 

//  Do  not  add  code  here.  Add  code  in  the  .C  file. 

// 

//  This  file  is  maintained  by  WindowsMAKER  Professional. 

//As  you  make  changes  in  your  application  using  WindowsMAKER  Professional, 
//  this  file  is  automatically  updated,  therefore  you  never  modify  this  file. 
// 

// 

// 

//  For  more  information, 

//  see  the  section  "How  code  is  generated"  in  the  documentation. 

// 

II  *********************************************************************** 

// 


! ! ******************************************************** 

//  ERROR  MESSAGE  HANDLING 

! ! ******************************************************** 

int  BLDDisplayMessageDef (HWND  hWnd,UINT  uMsg,char  *pContext, int  iType) 

{ 

int  i , j ; 

char  szMessage [200+1 ] ; 

if  (uMsg) 

{ 

if  ( ! Loadstring (hinst, uMsg, szMessage, 200) ) 

{ 

MessageBox (hWnd, BLDLOADERROR, BLDMA INCAPTION, 

MB_OK I MB_SYSTEMMODAL | MB_ICONHAND) ; 
return  FALSE; 

} 

} 

else 

szMessage [0] =0; 

if  (pContext) 

{ 

i = Istrlen (szMessage)  ; 
j = Istrlen (pContext ) ; 
if  (i  + j + 1 <=  200) 

{ 

Istrcat (szMessage,  " ")  ; 

Istrcat (szMessage,  pContext) ; 

} 

} 

return  MessageBox (hWnd, szMessage, BLDMAINCAPT ION, iType) ; 

} 

II  ************************************************************* 

//  FUNCTIONS  FOR  DRAWING  GRAPHIC  BUTTONS 

II  ************************************************************* 


BOOL  BLDBitmapToScreenDef (HDC  hDestDC,  char  *pBitmapName 
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int  X,int  Y, int  nWidth,int  nHeight, 

DWORD  dwRop,BOOL  bStretch) 

{ 

HDC  hMemDC; 

BITMAP  Bitmap; 

HBITMAP  hBitmap; 

if  (IhBMPInst) 

hBMPInst  = hinst; 

hBitmap  = BLDLoadBitmap (hBMPInst , pBitmapName) ; 

if  (! hBitmap) 

{ 

BLDDisplayMessage (GetActiveWindow ( ) ,BLD_CannotLoadBitmap,pBitmapName, 
MB_OK  I MB_ICONASTERISK) ; 

return  FALSE; 

} 

hMemDC  = CreateCompatibleDC (hDestDC) ; 

if  (! hMemDC) 

{ 

DeleteObject (hBitmap) ; 
return  FALSE; 

} 

if  (! SelectObject (hMemDC, hBitmap) ) 

{ 

DeleteObject (hBitmap) ; 

DeleteDC (hMemDC) ; 
return  FALSE; 

} 

if  (bStretch) 

{ 

if  ( IGetObject (hBitmap, sizeof (BITMAP) , (LPSTR) SBitmap) ) 

{ 

DeleteObject (hBitmap) ; 
return  FALSE; 

} 

StretchBlt (hDestDC, 

X, 

Y, 

nWidth, 

nHeight, 

hMemDC, 

0, 

0, 

Bitmap. bmWidth, 

Bitmap . bmHeight , 
dwRop) ; 

} 

else 

{ 

BitBlt (hDestDC, X,Y,nWidth, nHeight, hMemDC, 0, 0,dwRop) ; 

} 

DeleteDC (hMemDC) ; 

DeleteObject (hBitmap) ; 
return  TRUE; 

} 


service,  vmic 


Wed  Mar  2 14:14:12  1994 


3 


BOOL  BLDDrawIconDef (LPDRAWITEMSTRUCT  IpDrawItem, char  *pIconName) 

{ 

HICON  hi con; 

hicon  = Loadicon (hInst,pIconName) ; 
if  (! hicon) 

{ 

BLDDisplayMessage (GetActiveWindow () , BLD_CannotLoadIcon, pIconName, 

MB_OK  I MB_ICONASTERISK) ; 

return  FALSE; 

} 

SetMapMode (lpDrawItem->hDC,MM_TEXT) ; 
return  Drawicon (lpDrawItem->hDC, 0, 0, hicon) ; 

} 


BOOL  BLDDrawBitmapDef (LPDRAWITEMSTRUCT  IpDrawItem,  char  *pBitmapName, BOOL  bStretch) 

{ 

int  iRaster; 

iRaster  = GetDeviceCaps (lpDrawItem->hDC, RASTERCAPS) ; 

if  ( {iRaster&RC_BITBLT) !=RC_BITBLT) 

return  FALSE;  //  Device  cannot  display  bitmap 

return  BLDBitmapToScreen (lpDrawItem->hDC, pBitmapName, 
lpDrawItem->rcItem. left, 
lpDrawItem->rcItem, top, 

■ lpDrawItem->rcItem. right-lpDrawItem->rcItem. left, 
lpDrawItem->rcItem.bottom-lpDrawItem->rcItem. top, 

SRCCOPY, bStretch) ; 

} 


BOOL  BLDDrawBkgndIconDef (HWND  hDlg, PAINTSTRUCT  *pPs,char  *pIconName, int  iCtrllD) 

{ 

RECT  Rect, Dummy; 

HWND  CtrlhWnd; 

HICON  hicon; 

CtrlhWnd=GetDlgItem (hDlg, iCtrllD)  ; 
if ( ! CtrlhWnd) 

return  FALSE; 

GetWindowRect (CtrlhWnd,  &Rect) ; 

ScreenToClient (hDlg, (LPPOINT) SRect . left) ; 

ScreenToClient (hDlg, (LPPOINT) SRect. right) ; 

hicon  = Loadicon (hinst , pIconName) ; 
if  ( ! hicon) 

{ 

BLDDisplayMessage (GetActiveWindow ( ) , BLD_CannotLoadIcon, pIconName, 

MB_OK  1 MB_ICONASTERISK) ; 

return  FALSE; 

} 

if ( ! IntersectRect (SDummy,  SRect,  &pPs->rcPaint) ) 
return  TRUE;  //  No  intersection 

SetMapMode (pPs->hdc,MM_TEXT) ; 

return  Drawicon (pPs->hdc, Rect , left , Rect . top, hicon)  ; 

} 
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BOOL  BLDDrawBkgndBitmapDef (HWND  hDlg, PAINTSTRUCT  *pPs,char  *pBitmapName, 

int  iCtrllD^BOOL  bStretch, BOOL  bCtrl) 

{ 


int 

iRaster; 

RECT 

Rect , Dummy; 

HWND 

CtrlhWnd; 

int 

xScrolled, yScrolled; 

iRaster  = GetDeviceCaps (pPs->hdc, RASTERCAPS) ; 
if  ( (iRaster&RC_BITBLT) !=RC_BITBLT) 

return  FALSE;  //  Device  cannot  display  bitmap 

if (bCtrl) 

{ 

CtrlhWnd=GetDlgItem(hDlg, iCtrllD) ; 
if ( ICtrlhWnd) 

return  FALSE; 

GetWindowRect (CtrlhWnd,  SRect) ; 

ScreenToClient (hDlg, (LPPOINT) SRect . left) ; 
ScreenToClient (hDlg, (LPPOINT) &Rect . right ) ; 

} 

else 

{ 

GetClientRect (hDlg,  SRect) ; 
if  ( IbStretch) 

{ 

BLDGetDlgScrolled (hDlg, &xScrolled, SyScrolled) ; 
Rect.left  -=  xScrolled; 

Rect.top  -=  yScrolled; 

} 

} 

if ( ! IntersectRect (&Dummy,  &Rect,  &pPs->rcPaint) ) 
return  TRUE;  //  No  intersection 

return  BLDBitmapToScreen (pPs->hdc, pBitmapName, 

Rect . left, 

Rect . top, 

Rect . right-Rect . left, 

Rect . bottom-Rect . top, 
SRCCOPY,bStretch) ; 

} 


BOOL  BLDDrawAutoStateDef (LPDRAWITEMSTRUCT 

BOOL  bStretch) 


{ 

int 

BOOL 

HBRUSH 

int 

COLORREF 

HICON 


x,y,dx,dy; 

bDown, bActive; 

h01dBrush; 

incr,  if  jf bGray; 

color; 

hicon; 


IpDrawItem, char  *szResource, BOOL  bBitmap, 


if  (lpDrawItem->CtlType  !=  ODT_BUTTON) 
return  FALSE; 


if  ( (lpDrawItem->itemAction  & (ODA_SELECT  | ODA_DRAWENTIRE) ) 
return  FALSE; 


0) 
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bDown  = (lpDrawItem->itemState  & ODS_SELECTED)  !=  0; 
bActive  = (lpDrawItem->itemState  & ODS_DISABLED)  ==  0; 

X = lpDrawItem->rcI tern. left; 
y = lpDrawItem->rcItem. top; 

dx  = lpDrawItem->rcItem. right-lpDrawItem->rcItem. left-6; 
dy  = lpDrawItem->rcItem.bottom-lpDrawItem->rcItem. top-6; 

incr  = bDown  ? 4 : 3; 

if ( ! *szResource) 

{ 

hOldBrush  = SelectOb ject (lpDrawItem->hDCr GetStockOb ject (LTGRAY_BRUSH) ) ; 
PatBlt (lpDrawItein->hDC,  x+incr,  y+incr,  dx,  dy,  PATCOPY) ; 

SelectObject (lpDrawItem->hDC, hOldBrush) ; 

} 

else 

{ 

if (bBitmap) 

{ 

if ( ! BLDBitmapToScreen (lpDrawItem->hDC, szResource, 
x+incr, 
y+incr, 

dx, 

dy, 

SRCCOPY,bStretch) ) 

return  FALSE; 

} 

else 

{ 

if  (! (hIcon=LoadIcon (hlhst, szResource) ) ) 
return  FALSE; 

Drawicon (lpDrawItem->hDC, x+incr, y+incr, hicon) ; 

} 

} 

//  Make  the  bitmap  grayed 
if  (! bActive) 

{ 

color  = BLD_LTGRAY; 

for  (j=y+incr;  j<dy;  ++j) 

{ 

bGray  = j % 2; 

for  {i=x+incr;  i<dx;  ++i) 

{ 

if  (bGray) 

SetPixel (lpDrawItem->hDC,  i,  j,  color); 
bGray  = ! bGray; 

} 

} 

} 

return  BLDDrawFrame (lpDrawItem->hDC, x, y, dx, dy, bDown) ; 

} 


BOOL  BLDDrawStateBitmapDef (LPDRAWITEMSTRUCT  IpDrawItem, char  *szNormal, char  *szFocus, 

char  *szSelected, char  *szDisabled, BOOL  bStretch) 

{ 

if ( !*szFocus  &&  !*szSelected  &&  ! *szDisabled) 

{ 

return  BLDDrawAutoState (IpDrawItem,  szNormal,  TRUE,  bStretch); 
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} 

if  ( (lpDrawItem->iteitiState  & ODS_DISABLED)  &&  *szDisabled) 
return  BLDDrawBitmap (IpDrawItem, szDisabled, bStretch) ; 
if ( (lpDrawItem->iteinState  & ODS_SELECTED)  &&  *szSelected) 
return  BLDDrawBitmap (IpDrawItem, szSelected, bStretch) ; 
if ( (lpDrawItem->itemState  & ODS_FOCUS)  &&  *szFocus) 

return  BLDDrawBitmap (IpDrawItem, szFocus, bStretch) ; 
if  (*szNonnal) 

return  BLDDrawBitmap (IpDrawItem,  szNormal, bStretch) ; 
return  TRUE; 

} 


BOOL  BLDDrawStatelconDef (LPDRAWITEMSTRUCT  IpDrawItem, char  *szNormal, char  *szFocus, 

char  *szSelected, char  *szDisabled) 

{ 

if ( !*szFocus  &&  !*szSelected  &&  ! *szDisabled) 

{ 

return  BLDDrawAutoState (IpDrawItem,  szNormal,  FALSE,  FALSE); 

} 

if ( (lpDrawItem->itemState  & ODS_DISABLED)  &&  *szDisabled) 
return  BLDDrawIcon (IpDrawItem, szDisabled)  ; 
if { (lpDrawItem->itemState  & ODS_SELECTED)  &&  *szSelected) 
return  BLDDrawIcon (IpDrawItem, szSelected) ; 
if ( (lpDrawItem->itemState  & ODS_FOCUS)  &&  *szFocus) 
return  BLDDrawIcon (IpDrawItem, szFocus)  ; 
if (*szNormal) 

return  BLDDrawIcon (IpDrawItem, szNormal) ; 
return  TRUE; 

} 


BOOL  BLDDrawItemDef (HWND  hDlg, LPDRAWITEMSTRUCT  IpDrawItem) 

{ 

char  szStr[20]; 

if (lpDrawItem->CtlType  ==  ODT_BUTTON) 

{ 

GetWindowText ( IpDrawI tern- >hwndl tern, szStr, 20 ) ; 
if(lstrcmpi(  (LPSTR) szStr,  (LPSTR) "WMP3DBUTTON" ) ==  0 ) 
{ 

BLDDrawStateBitmap  (IpDrawItem,  *»",  TRUE)  ; 

return  TRUE; 

} 

} 

return  FALSE; 

} 


BOOL  BLDDrawFrame (HDC  hDC,int  x,int  y,int  dx,int  dy,BOOL  bDown) 

{ 

HPEN  hold, hBlack, hLtGray, hGray, hWhite; 

hBlack  = CreatePen (0, 1,BLD_BLACK) ; 

hGray  = CreatePen ( 0 , 1 , GetDeviceCaps (hDC,  NUMCOLORS)  > 2 ? BLD_GRAY  : BLD_WHITE) ; 
hWhite  = CreatePen (0, 1, BLD_WHITE) ; 

hLtGray  = CreatePen ( 0 , 1 , GetDeviceCaps (hDC,  NXMCOLORS)  > 2 ? BLD_LTGRAY  : BLD_WHITE) 

//  Paint  the  frame 

hold  = SelectOb ject  (hDC,  hBlack) ; 

BLDMoveTo (hDC,x+l,y) ; 

LineTo (hDC,  x+dx+5,  y) ; 
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BLDMoveTo (hDC,x+l,y+dy+5) ; 
LineTo(hDC,  x+dx+5,  y+dy+5) ; 

BLDMoveTo (hDC, x, y+1 ) ; 

LineTo (hDC,  x,  y+dy+5); 

BLDMoveTo (hDC,x+dx+5,y+l) ; 

LineTo (hDC,  x+dx+5,  y+dy+5); 

if  (bDown) 

{ 

BLDMoveTo (hDC, x+1 , y+1 ) ; 
LineTo(hDC,  x+dx+5,  y+1); 
BLDMoveTo (hDC, x+1, y+2) ; 
LineTo(hDC,  x+1,  y+dy+5); 
BLDMoveTo (hDC, x+dx+4 , y+dy+4 ) ; 
LineTo(hDC,  x,  y+dy+4); 
BLDMoveTo (hDC, x+dx+4 , y+dy+3 ) ; 
LineTo (hDC,  x+dx+4,  y); 

SelectObject (hDC,hGray) ; 
BLDMoveTo ( hDC , x+2 , y+2 ) ; 

LineTo (hDC, x+dx+4 , y+2 ) ; 
BLDMoveTo (hDC, x+2 , y+3 ) ; 

LineTo (hDC, x+2, y+dy+4) ; 

SelectObject (hDC, hLtGray) ; 
BLDMoveTo (hDC, x+ 3, y+3) ; 

LineTo (hDC, x+dx+4, y+3) ; 
BLDMoveTo (hDC, x+3,y+4) ; 

LineTo (hDC, x+3, y+dy+4)  ; 

} 

else 

{ 

SelectObject (hDC,hWhite) ; 
BLDMoveTo (hDC, x+1 , y+1 ) ; 

LineTo (hDC, x+dx+4 , y+1 ) ; 
BLDMoveTo (hDC, x+1 , y+2 ) ; 

LineTo (hDC, x+1 , y+dy+4 ) ; 
BLDMoveTo ( hDC , x+2 , y+2 ) ; 

LineTo (hDC, x+dx+3, y+2 ) ; 
BLDMoveTo (hDC,  x+2, y+3) ; 

LineTo (hDC, x+2 , y+dy+3) ; 


SelectObject (hDC,  hGray) ; 
BLDMoveTo (hDC, x+dx+4, y+dy+4) ; 
LineTo (hDC, X, y+dy+4) ; 
BLDMoveTo (hDC, x+dx+4 , y+dy+3 ) ; 
LineTo (hDC, x+dx+4, y) ; 
BLDMoveTo (hDC, x+dx+3, y+dy+3) ; 
LineTo (hDC, x+1, y+dy+3)  ; 
BLDMoveTo (hDC, x+dx+3, y+dy+2)  ; 
LineTo (hDC, x+dx+3, y+1)  ; 

} 

SelectObject (hDC,  hold) ; 

DeleteOb ject (hBlack) ; 

DeleteObject (hWhite) ; 

DeleteOb ject (hGray) ; 

DeleteObject (hLtGray) ; 
return  TRUE; 

} 
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static  BOOL  BLDMoveTo (HDC  hDC, int  x,int  y) 

{ 

#ifdef  WIN32 

return  MoveToEx (hDC, x, y, NULL) ; 

#else 

return  (BOOL) MoveTo (hDC, x, y) ; 

#endif 

} 


II  ************************************************************* 

II  FUNCTIONS  FOR  DIALOG  BOX  SCROLLING 

! ! ************************************************************* 

void  BLDGetDlgScrolledDef (HWND  hDlg, int  *pxScrolled, int  *pyScrolled) 

{ 

*pxScrolled=(int)GetProp(hDlg, "BLDPROPHSCROLLED" ) ; 

*pyScrolled= (int) GetProp (hDlg, "BLDPROPVSCROLLED" ) ; 

} 


void  BLDSetDlgScrolledDef (HWND  hDlg^int  xScrolled, int  yScrolled) 

{ 

if (xScrolled) 

SetProp (hDlg, "BLDPROPHSCROLLED", (HANDLE) xScrolled) ; 

else 

if (GetProp (hDlg, "BLDPROPHSCROLLED") ) 

RemoveProp (hDlg, "BLDPROPHSCROLLED") ; 

if (yScrolled) 

SetProp (hDlg, "BLDPROPVSCROLLED",  (HANDLE) yScrolled)  ; 

else 

if (GetProp (hDlg, "BLDPROPVSCROLLED") ) 

RemoveProp (hDlg, "BLDPROPVSCROLLED") ; 

} 


BOOL  BLDExitScrollDlgDef (HWND  hDlg) 

{ 

if (GetProp (hDlg, "BLDPROPHSCROLLED") ) 

RemoveProp (hDlg, "BLDPROPHSCROLLED") ; 
if (GetProp (hDlg, "BLDPROPVSCROLLED") ) 

RemoveProp (hDlg, "BLDPROPVSCROLLED") ; 
return  TRUE; 

} 


void  BLDFindCtrlsRightBottomDef (HWND  hDlg, int  *xRight,int  *yBottom) 

{ 

HWND  CtrlhWnd; 

RECT  Rect ; 

*xRight=0; 

*yBottom=0; 

CtrlhWnd  = GetWindow (hDlg, GW_CHILD)  ; 

while (CtrlhWnd) 

{ 

GetWindowRect (CtrlhWnd, &Rect)  ; 

ScreenToClient (hDlg, (LPPOINT) SRect . right ) ; 

*xRight  = max(*xRight  , Rect . right ) ; 

*yBottom  = max (*yBottom, Rect .bottom) ; 

CtrlhWnd  = GetWindow (CtrlhWnd, GW_HWNDNEXT) ; 
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} 


} 


void  BLDCalcScrollRangesDef (HWND  hDlg, int  *xRange,int  *yRange,int  xScrolled, 

int  yScrolled, int  iRightOf,int  iBelow) 

{ 

RECT  ClientRect; 

int  xRight , yBottom; 

BLDFindCtrlsRightBottoin(hDlg, SxRight, &yBottom) ; 

GetClientRect (hDlg, &ClientRect) ; 
xRight  +=xScrolled+iRightOf ; 
yBottoin+=yScrolled+iBelow; 

*xRange=max (0,xRight  - ClientRect . right ) ; 

*yRange=max (0,yBottom  - ClientRect .bottom) ; 

} 


BOOL  BLDScrollDlgDef (HWND  hDlg,UINT  message, int  nScrlCode, int  nPos,int  iVertLine, 

int  iHorLine,int  iVertPage, int  iHorPage,int  iRightOf, 
int  iBelow, BOOL  binvalidate) 

{ 


int 

xScroll, y Scroll ; 

int 

xRange , yRange ; 

int 

i Thumb; 

BOOL 

bDlgUnits; 

int 

xScrolled; 

int 

yScrolled; 

BLDGetDlgScrolled (hDlg, SxScrolled, SyScrolled) ; 

xScroll=yScroll=0; 

BLDCalcScrollRanges (hDlg, SxRange, SyRange, xScrolled, yScrolled, iRightOf , iBelow) 

bDlgUnits=FALSE; 

switch (message) 

{ 

case  WM_VSCROLL: 

switch (nScrlCode) 

{ 

case  SB_BOTTOM: 

yScroll=yRange-y Scrolled; 

bDlgUnits=FALSE; 

break; 

case  SB_ENDSCROLL : 
break; 

case  SB_LINEDOWN: 

yScroll=iVert Line ; 

bDlgUnits=TRUE; 

break; 

case  SB_LINEUP: 

yScroll=-iVertLine ; 

bDlgUnits=TRUE; 

break; 

case  SB_PAGEDOWN: 
if  (iVertPage) 

{ 

RECT  Rect; 

GetClientRect (hDlg, &Rect) ; 

yScroll=MulDiv (Rect - bottom, iVertPage, 100) ; 
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bDlgUnits=FALSE; 

} 

break; 

case  SB_PAGEUP: 
if (iVertPage) 

{ 

RECT  Rect; 

GetClientRect (hDlg, SRect) ; 

yScroll=-MulDiv (Rect . bottom, iVertPage, 100 ) 
bD 1 gUni t s =F ALS  E ; 

} 

break; 

case  SB_THUMBPOSITION: 
i Thumb  =nPos; 

yScroll=-yScrolled  + MulDiv (iThumb,yRange, 100) 

bDlgUnits=FALSE; 

break; 

case  SB_THUMBTRACK:  //No  Support 

break; 

case  SB_TOP : 

y Scroll=-y Scrolled; 

bDlgUnits=FALSE; 

break; 

} 

break; 

case  WM_HSCROLL: 

switch (nScrlCode) 

{ 

case  SB_BOTTOM: 

xScroll=xRange-xSc rolled; 
bDlgUnits=FALSE;  ■ 
break; 

case  SB_ENDSCROLL: 
break; 

case  SB_LINEDOWN: 

xScroll=iHorLine; 

bDlgUnits=TRUE; 

break; 

case  SB_LINEUP: 

xScroll=-iHorLine; 

bDlgUnits=TRUE; 

break; 

case  SB_P AGED OWN: 
if (iVertPage) 

{ 

RECT  Rect; 

GetClientRect (hDlg, SRect) ; 
xScroll=MulDiv (Rect. right, iHorPage, 100) ; 
bDlgUnits=FALSE; 

} 

break; 

case  SB_PAGEUP: 
if (iVertPage) 

{ 

RECT  Rect; 

GetClientRect (hDlg, SRect) ; 

xScroll=-MulDiv (Rect .bottom, iHorPage, 100)  ; 
bDlgUnit s=FALSE ; 

} 

break; 

case  SB_THUMBPOSITION: 
i Thumb  =nPos; 

xScroll=-xScrolled  + MulDiv (i Thumb, xRange, 100 ) 
bDlgUnit s=FALSE; 
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break; 

case  SB_THUMBTRACK:  //No  Support 

break; 

case  SB_TOP: 

xScroll=-xScrolled; 

bDlgUnits=FALSE; 

break; 

} 

break; 

} 

if  (xScroll  I I yScroll) 

{ 

int  x,y; 
int  oldx^oldy; 

x=y=0; 

if (bDlgUnits) 

{ 

BOOL  xNeg^yNeg; 
xNeg=yNeg=FALSE ; 
if (xScroll  < 0) 

{ 

xScroll=-xScroll; 

xNeg=TRUE; 

} 

if(yScroll  < 0) 

{ 

yScroll=-yScroll; 

yNeg=TRUE; 

} 

xScroll= (xScroll  * LOWORD (GetDialogBaseUnits ()  ) ) /4 ; 
yScroll= (yScroll  * HIWORD (GetDialogBaseUnits {)))/ 8 ; 
if (xNeg) 

xScroll=-xScroll; 
if  (yNeg) 

yScroll=-yScroll; 

} 

oldx=xScrolled; 

oldy=yScrolled; 

xScrolled+=xScroll; 

yScrolled+=yScroll; 

if (xScrolled  > xRange) 
xScrolled  = xRange; 
if  (xScrolled  < 0) 
xScrolled=0; 

if (yScrolled  > yRange) 
yScrolled  = yRange; 
if (yScrolled  < 0) 
yScrolled=0 ; 

xScroll=xScrolled  - oldx; 
yScroll=yScrolled  - oldy; 

if (xScroll  M yScroll) 

{ 

ScrollWindow (hDlg, -xScroll, -yScroll, NULL, NULL) ; 
if (xRange) 

{ 

x=MulDiv (xScrolled, 100, xRange) ; 

SetScrollPos (hDlg, SB_HORZ,x, TRUE) ; 
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} 

return 

} 


} 

if (y Range) 

{ 

y=MulDiv (yScrolled, 100,yRange) ; 
SetScrollPos (hDlg, SB_VERT, y, TRUE)  ; 

} 

if (binvalidate) 

InvalidateRect (hDlg, NULL, FALSE) ; 
BLDSetDlgScrolled (hDlg, xScrolled, yScrolled)  ; 
} 

TRUE; 


II  ************************************************************* 

//  FUNCTION  FOR  CREATING  CONTROLS  IN  MAIN  WINDOW 

II  ************************************************************* 

//  Supports  Controls  in  Main  window  from  old  versions 

HWND  BLDCreateClientControlsDef (char  *pTemplateName, DLGPROC  IpNew) 

{ 

HWND  hDlg; 

hDlg  = BLDCreateClientDlg  (pTemplateName,MainhWnd, 0, IpNew, BLDDLGCLIENT, TRUE) ; 
if (hDlg) 

{ 

hClient  = hDlg; 

IpClient  = IpNew; 

ShowWindow (hDlg, SW_SHOW) ; 

■} 

return  hDlg; 

} 


//  Ensure  that  window  is  within  screen. 

void  BLDMoveWindowDef (HWND  hWnd, int  x, int  y,int  nWidth,int  nHeight,BOOL  bRepaint) 

{ 

int  xMax, yMax, xNew, yNew; 

xMax  = GetSystemMetrics (SM_CXSCREEN) ; 
yMax  = GetSystemMetrics (SM_CYSCREEN) ; 

if  ( (nWidth<=xMax) && (x+nWidth>xMax) ) 
xNew=xMax -nWi dt h ; 

else 

xNew=x ; 

if  ( (nHeight<=yMax) && (y+nHeight>yMax) ) 
yNew=yMax-nHeight ; 

else 

yNew=y ; 

MoveWindow (hWnd, xNew, yNew, nWidth, nHeight, bRepaint ) ; 
return; 

} 


void  BLDMoveDlgClientDef (HWND  ParenthWnd, HWND  hNew) 

{ 

int 


RECT 

int 


xLeft , yTop, xRight , yBottom; 
rClient, rMain, rDialog; 
dxDialog, dyDialog, dyExtra; 
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BLDCalcToolbarFrame  (ParenthWnd, SxLeft^  SyTop, SxRight, SyBottom) ; 

GetClientRect (ParenthWnd, SrClient) ; 

GetWindowRect (ParenthWnd, &rMain) ; 

GetWindowRect (hNew, &rDialog) ; 

if ( (GetWindowLong (ParenthWnd, GWL_STYLE)  & WS_CHILD  ) &&  GetParent (ParenthWnd) ) 

{ 

ScreenToClient (GetParent (ParenthWnd) , (LPPOINT) SrMain.left) ; 

ScreenToClient (GetParent (ParenthWnd) , (LPPOINT) SrMain. right) ; 

} 

dxDialog= (rDialog. right-rDialog. left ) - (rClient . right-rClient . left) ; 
dyDialog= (rDialog. bottom- rDialog. top) - (rClient . bottom- rClient . top) ; 
if ( (GetWindowLong (ParenthWnd, GWL_STYLE)  & WS_CHILD  ) &&  GetParent (ParenthWnd) ) 
MoveWindow (ParenthWnd, rMain . left , rMain . top, 

(rMain. right-rMain.left) +dxDialog+xLeft+xRight , 

(rMain. bottom- rMain. top) +dyDialog+yTop+yBottom, 

TRUE) ; 

else 

BLDMoveWindow  (ParenthWnd,  rMain.  left,  rMain.  top, 

(rMain. right-rMain. left) +dxDialog+xLeft+xRight , 

( rMain . bottom- rMain .top) +dyDialog+yTop+yBottom, 

TRUE) ; 

MoveWindow (hNew,xLeft,yTop, 

(rDialog. right-rDialog. left ) , 

(rDialog. bottom- rDialog. top)  , 

TRUE) ; 

GetClientRect (ParenthWnd, &rClient) ; 

//  Compensate  size  if  menu  bar  is  more  than  one  line. 

if  ( (rDialog. bottom-rDialog. top+yTop+yBottom) > (rClient .bottom- rClient . top) ) 

{ 

dyExtra= (rDialog. bottom- rDialog. top) - (rClient .bottom- rClient . top) ; 
if(  (GetWindowLong (ParenthWnd, GWL_STYLE)  & WS_CHILD  ) &&  GetParent (ParenthWnd) ) 
MoveWindow (ParenthWnd, rMain. left, rMain. top, 

(rMain. right-rMain.left) +dxDialog+xLeft+xRight , 

(rMain . bottom- rMain .top) +dyDialog+yTop+yBottom+dyExtra, 

TRUE) ; 

else 

BLDMoveWindow (ParenthWnd, rMain. left, rMain. top, 

(rMain. right-rMain. left) +dxDialog+xLeft+xRight , 

(rMain . bottom- rMain . top) +dyDialog+yTop+yBottom+dyExtra, 

TRUE) ; 

} 

} 


void  BLDSetClientFocusDef (HWND  hWnd) 

{ 

HWND  ChildhWnd; 

int  iRetval; 

ChildhWnd=GetWindow (hWnd, GW_CHILD) ; 
while (ChildhWnd) 

{ 

iRetval=0 ; 

SendMessage (ChildhWnd, wBLDWindowType, 0 , (LPARAM) (LPINT) &iRetval) ; 
if  (iRetval  ==  BLDDLGCLIENT) 

{ 

SetFocus (ChildhWnd) ; 
break; 

} 

ChildhWnd=GetWindow (ChildhWnd, GW_HWNDNEXT) ; 
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} 


} 


void  BLDClientMoveDef (HWND  hWnd) 

{ 

HWND  ChildhWnd; 

int  iRetval; 

if  ( (GetActiveWindow ( ) ! =hWnd) && (GetActiveWindow ( ) ! =MainhWnd) ) 
return; 

ChildhWnd=GetWindow (hWnd, GW_CHILD) ; 
while (ChildhWnd) 

{ 

iRetval=0; 

SendMessage (ChildhWnd, wBLDWindowType, 0, (LPARAM) (LPINT) &iRetval) ; 
switch (iRetval ) 

{ 

case  BLDTOOLBARTOP : 
case  BLDTOOLBARBOTTOM: 
case  BLDTOOLBARLEFT: 
case  BLDTOOLBARRIGHT: 
case  BLDDLGCLIENT : 

//  Hides  the  list  box  of  a combo  box 

SetFocus (ChildhWnd) ; 

break; 

} 

ChildhWnd=GetWindow (ChildhWnd, GW_HWNDNEXT) ; 

} ■ ■ • 

} 


II  ************************************************************* 

//  FUNCTION  FOR  HANDLING  TOOLBARS  CONTROLS  IN  MAIN  WINDOW 

II  ************************************************************* 

/ / Startup  procedure  for  Toolbars 

HWND  BLDCreateClientDlgDef (char  *pTemplateName, HWND  ParenthWnd, UINT  message, 

DLGPROC  lpNew,int  Position, BOOL  bToMainWnd) 

{ 

int  iRetval; 

HANDLE  hRes , hMem; 

LPBLD_DLGTEMPLATE  IpDlg; 

DWORD  styleold, Style; 

HWND  hNew, ChildhWnd; 

if (bToMainWnd) 

ParenthWnd  = MainhWnd; 

if  ( ! IsWindow (ParenthWnd) ) 
return  0 ; 

if  (hMDIClient  &&  (Position  ==  BLDDLGCLIENT)  &&  (ParenthWnd  ==  MainhWnd) ) 
return  FALSE; 

iRetval=0  ; 

SendMessage (ParenthWnd, wBLDWindowType, 0 , (LPARAM) (LPINT) siRetval) ; 
while (ParenthWnd  &&  iRetval) 

{ 

ParenthWnd=GetParent (ParenthWnd) ; 
iRetval=0 ; 

SendMessage (ParenthWnd, wBLDWindowType, 0 , (LPARAM) (LPINT) & iRetval) ; 
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} 

if  ( ! IsWindow (ParenthWnd) ) 
return  FALSE; 

ChilcihWnd=GetWindow  (ParenthWnd,  GW__CHILD)  ; 
while (ChildhWnd) 

{ 

iRetval=0; 

SendMessage (ChildhWnd, wBLDWindowType, 0, (LPARAM) (LPINT) SiRetval) ; 
if  (iRetval  ~=  Position) 

{ 

DestroyWindow (ChildhWnd) ; 
break; 

} 

ChildhWnd=GetWindow (ChildhWnd, GW__HWNDNEXT ) ; 

} 

//  Get  access  to  data  structure  of  dialog  box  containing  layout  of  controls 
hRes=FindResource (hinst, (LPSTR) pTemplateName, RT__DIALOG) ; 
if  ( ! hRes) 

return  0 ; 

hMem=LoadResource (hinst, hRes) ; 
if  ( ! hMem) 

return  0 ; 

lpDlg=  (LPBLD__DLGTEMPLATE)  LockResource  (hMem)  ; 
if  (IlpDlg) 
return  0 ; 

style.old  = lpDlg->style; 

switch (Position) 

{ 

case  BLDTOOLBARTOP : 
case  BLDTOOLBARBOTTOM: 

/ / Change  dialog  box  data  structure  so  it  can  be  used  as  a window  in  client  area 
style  ^ lpDlg->style& (TOOLBARSTRIP) ; 

lpDlg->style  - lpDlg->style'' style; 

lpDlg->style  = lpDlg->style  I WS_CHILD  | WS__CLIPSIBLINGS; 

#ifdef  WIN32 

hNew  = CreateDialogIndirect (hinst , ( LPCDLGTEMP LATE ) IpDlg, ParenthWnd, IpNew) ; 

#else 

hNew  = CreateDialogIndirect (hinst , (LPSTR) IpDlg, ParenthWnd, IpNew) ; 

#endif 

if  (IhNew) 

return  0 ; 
break; 

case  BLDTOOLBARLEFT : 
case  BLDTOOLBARRIGHT : 

//  Change  dialog  box  data  structure  so  it  can  be  used  as  a window  in  client  area 
style  = lpDlg->style& (TOOLBARSTRIP) ; 

lpDlg->style  = lpDlg->style'' style; 

lpDlg->style  = lpDlg->style  I WS__CHILD  | WS__CLIP SIBLINGS; 

#ifdef  WIN32 

hNew  = CreateDialogIndirect (hinst , (LPCDLGTEMPLATE) IpDlg, ParenthWnd, IpNew) ; 

#else 

hNew  = CreateDialogIndirect (hinst , (LPSTR) IpDlg, ParenthWnd, IpNew) ; 

#endif 

if  ( ! hNew ) 

return  0 ; 
break; 

case  BLDDLGCLIENT: 

style  = lpDlg->style& (CLIENTSTRIP ) ; 

lpDlg->style  = lpDlg->style''style; 
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lpDlg“>style  = lpDlg->style  I WS_CHILD  1 WS_CLIPSIBLINGS; 

#ifdef  WIN32 

hNew  = CreateDialogIndirect (hinst , (LPCDLGTEMPLATE) IpDlg, ParenthWnd, IpNew) ; 

#else 

hNew  = CreateDialogIndirect (hinst , (LPSTR) IpDlg, ParenthWnd, IpNew) ; 

tendif 

if  ( ! hNew) 

return  0 ; 

//  Move  and  size  window  in  client  area  and  main  window 
BLDMoveDlgClient (ParenthWnd, hNew) ; 

SetFocus (hNew) ; 
break; 

} 

//  Restore  dialog  box  data  structure. 
lpDlg->style  =styleold; 

UnlockResource (hMem) ; 

FreeResource (hMem) ; 

if (message  ==  WM_COMMAND  &&  BLDDLGCLIENT  !=  Position) 

{ 

RECT  Rect; 

LPARAM  IP a ram; 

ChildhWnd=GetWindow (ParenthWnd, GW_CHILD) ; 
while (ChildhWnd) 

{ 

iRetval=0; 

SendMessage (ChildhWnd, wBLDWindowType, 0, (LPARAM) (LPINT) siRetval) ; 
if  (iRetval  ==  BLDDLGCLIENT) 

{ 

BLDMoveDlgClient (ParenthWnd, ChildhWnd) ; 
break; 

} 

ChildhWnd=GetWindow (ChildhWnd, GW_HWNDNEXT) ; 

} 

GetClientRect (ParenthWnd, (LPRECT) &Rect) ; 

lParam=MAKELONG (Rect . right-Rect . left, Rect .bottom-Rect . top) ; 

PostMessage (ParenthWnd, WM_S I ZE, SIZE_RESTORED, IP a ram) ; 

} 

return  hNew; 

} 


void  BLDCalcToolbarFrameDef (HWND  hWnd, int  *pxLeft,int  *pyTop,int  *pxRight,int  *pyBottom) 

{ 

HWND  ChildhWnd; 

int  iRetval; 

RECT  Rect ; 

*pxLeft=*pyTop=*pxRight=*pyBottom=0; 

ChildhWnd=GetWindow (hWnd, GW_CHILD) ; 
while (ChildhWnd) 

{ 

iRetval=0 ; 

SendMessage (ChildhWnd, wBLDWindowType, 0, (LPARAM) (LPINT) &iRetval) ; 

GetWindowRect (ChildhWnd, (LPRECT) &Rect) ; 

ScreenToClient (hWnd, (LPPOINT) &Rect . left ) ; 

ScreenToClient (hWnd, (LPPOINT) SRect . right) ; 
switch (iRetval) 

{ 

case  BLDTOOLBARTOP : 

*pyTop=Rect . bottom-Rect . top; 
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break; 

case  BLDTOOLBARBOTTOM: 

*pyBottom=Rect . bottom-Rect . top; 
break; 

case  BLDTOOLBARLEFT : 

*pxLeft=Rect . right-Rect . left; 
break; 

case  BLDTOOLBARRIGHT: 

*pxRight=Rect . right-Rect . left ; 
break; 

} 

ChildhWnd=GetWindow (ChildhWnd, GW_HWNDNEXT) ; 

} 

} 


LRESULT  BLDSizeToolBarsDef (HWND  hWnd,UINT  message, int  nSizeType, 

int  nWidth,int  nHeight,BOOL  VerticalOnTop) 

{ 

HWND  ChildhWnd; 

int  iRetval ; 

RECT  Rect ; 

int  xLeft , yTop, xRight , yBottom; 

if ( (nSizeType  !=  SIZE_RESTORED) && (nSizeType  !=  SIZE_MAXIMIZED) ) 
return  OL; 


BLDCalcToolbarFrame (hWnd, &xLeft, SyTop, SxRight, SyBottom) ; 


ChildhWnd=GetWindow (hWnd, GW_CHILD) ; 
while (ChildhWnd) 

{ 

iRetval=0 ; 

SendMessage (ChildhWnd, wBLDWindowType,  0,  (LPARAM)  (LPINT) SiRetval) 
GetWindowRect (ChildhWnd, (LPRECT) SRect) ; 

ScreenToClient (hWnd, (LPPOINT) &Rect . left) ; 

ScreenToClient (hWnd, (LPPOINT) &Rect . right) ; 


switch (iRetval) 

{ 

case  BLDTOOLBARTOP : 

Rect . bottom-=Rect . top; 
if ( ! VerticalOnTop) 

{ 

Rect. left  =xLeft; 

Rect. right  =nWidth-xLeft-xRight ; 

} 

else 

{ 

Rect. left  =0; 

Rect . right  =nWidth; 

} 

Rect. top  =0; 

MoveWindow (ChildhWnd, Rect . left , Rect . top, Rect . right, 
Rect . bottom, TRUE) ; 

InvalidateRect (ChildhWnd, (LPRECT) NULL, TRUE) ; 
break; 

case  BLDTOOLBARBOTTOM: 


Rect . bottom-=Rect . top; 
if ( ! VerticalOnTop) 

{ 

Rect. left  =xLeft; 

Rect . right  =nWidth-xLeft-xRight ; 

} 
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else 

{ 

Rect.left  =0; 

Rect . right  =nWidth; 

} 

Rect. top  =nHeight -Rect . bottom; 

MoveWindow (ChildhWnd, Rect . left, Rect . top, Rect . right, 
Rect . bottom, TRUE)  ; 

InvalidateRect {ChildhWnd, (LPRECT) NULL, TRUE) ; 
break; 

case  BLDTOOLBARLEFT : 

Rect. right  -=Rect.left; 

Rect.left  =0; 
if (VerticalOnTop) 

{ 

Rect. top  =yTop; 

Rect .bottom  =nHeight-yTop-yBottom; 

} 

else 

{ 

Rect. top  =0; 

Rect. bottom  =nHeight; 

} 

MoveWindow (ChildhWnd, Rect . left, Rect . top, Rect . right, 
Rect .bottom, TRUE) ; 

InvalidateRect (ChildhWnd, (LPRECT) NULL, TRUE) ; 
break; 

case  BLDTOOLBARRIGHT: 

Rect. right  -=Rect.left; 

Rect . left  =nWidth-Rect . right ; 
if (VerticalOnTop) 

{ 

Rect. top  =yTop; 

Rect .bottom  =nHeight-yTop-yBottom; 

} 

else 


{ 

Rect. top  =0; 

Rect. bottom  =nHeight; 

} 

MoveWindow (ChildhWnd, Rect . left, Rect . top, Rect . right, 

Rect . bottom, TRUE) ; 

InvalidateRect (ChildhWnd, (LPRECT) NULL, TRUE) ; 
break; 

} 

ChildhWnd=GetWindow (ChildhWnd, GW_HWNDNEXT) ; 

} 

if  (hMDIClient  &&  hWnd  ==  MainhWnd) 

{ 

GetClientRect (hWnd, (LPRECT) SRect) ; 

Rect.left  +=xLeft; 

Rect. top  +=yTop; 

Rect . right  -=xRight ; 

Rect .bottom-=yBottom; 

MoveWindow (hMDIClient , Rect . left , Rect . top, Rect . right-Rect . left, 
Rect.bottom-Rect .top, TRUE) ; 

} 

return  TRUE; 

} 


II  ************************************************************* 

//  FUNCTION  SENDING  MDI  MESSAGES 

II  ************************************************************* 
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BOOL  BLDSendMDIMessageDef (HWND- hWnd,UINT  message) 

{ 

if (hMDIClient) 

{ 

if (message  ==  WM_MDIGETACTIVE) 

{ 

HWND  hWnd; 

#ifdef  WIN32 

hWnd  = (HWND) (SendMessage (hMDIClient, WM_MDIGETACTIVE, 0, OL) ) ; 

#else 

hWnd  = (HWND) LOWORD (SendMessage (hMDIClient, WM_MDIGETACTIVE, 0, OL) ) ; 

#endif 

if (hWnd) 

SendMessage (hMDIClient, WM__MDIDESTROY, (WPARAM) hWnd, OL) ; 
return  TRUE; 

} 

SendMessage (hMDIClient, message,  0 , OL)  ; 
return  TRUE; 

} 

return  FALSE; 

} 


II  ************************************************************* 

//  FUNCTION  EXPANDING  OF  DIALOG  BOX 

II  ************************************************************* 


BOOL  BLDSizeDlgDef (HWND  hWnd, int  xRightOf,int  yBelow) 

{ 

RECT  Rect; 

RECT  OldWindowRect ; 

RECT  NewActualClientRect ; 

int  Cx,Cy; 

HWND  ClienthWnd; 

int  iRetval; 


BLDFindCtrlsRightBottom(hWnd, &Cx,  &Cy)  ; 

Cx  +=  xRightOf; 

Cy  +=  yBelow; 

GetClientRect (hWnd, (LPRECT) SRect) ; 
if  (Rect. right  >=  Cx  &&  Rect. bottom  >=  Cy  ) 
return  TRUE; 

if (Rect . right  < Cx) 

Rect. right  = Cx; 
if (Rect .bottom  < Cy) 

Rect. bottom  = Cy; 

GetWindowRect (hWnd, SOldWindowRect ) ; 

if ( ! (GetWindowLong(hWnd,GWL_STYLE)  & WS_CHILD) ) 

ClientToScreen (hWnd, (LPPOINT) SRect . left ) ; 

else 

ScreenToClient (GetParent (hWnd) , (LPPOINT) SOldWindowRect . left ) ; 

Rect . right  +=Rect . left ; 

Rect . bottom+=Rect . top; 

AdjustWindowRectEx (&Rect , GetWindowLong (hWnd, GWL_STYLE) , (BOOL) GetMenu (hWnd) , 
GetWindowLong(hWnd,GWL_EXSTYLE) ) ; 
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if (OldWindowRect . top  !=  Rect.top) 

{ 

Rect. bottom  +-  OldWindowRect . top  - Rect.top; 

Rect.top  =01dWindowRect . top; 

} 

if (OldWindowRect . left  !=  Rect. left) 

{ 

Rect. right  +=  OldWindowRect . left  - Rect. left; 

Rect. left  =01dWindowRect . left ; 

} 

MoveWindow (hWnd, Rect . left, Rect . top, Rect . right-Rect . left, 

Rect .bottom-Rect . top, TRUE) ; 

GetClientRect (hWnd, &NewActualClientRect ) ; 

if (NewActualClientRect .bottom  !=  Cy) 

{ 

Rect. bottom  -=  NewActualClientRect . bottom  - Cy; 

MoveWindow (hWnd, Rect . left, Rect . top, Rect . right-Rect . left, 

Rect . bottom-Rect . top, TRUE)  ; 

} 

if (NewActualClientRect . right  !=  Cx) 

{ 

Rect. right  -=  NewActualClientRect . right  - Cx; 

MoveWindow (hWnd, Rect . left, Rect . top, Rect . right-Rect . left, 

Rect .bottom-Rect . top, TRUE)  ; 

} 

iRetval=0; 

SendMessage (hWnd, wBLDWindowType, 0 , (LPARAM) (LPINT) SiRetval) ; 

switch (iRetval) 

{ 

case  BLDTOOLBARTOP : 
case  BLDTOOLBARBOTTOM: 
case  BLDTOOLBARLEFT : 
case  BLDTOOLBARRIGHT : 

ClienthWnd=GetWindow (GetParent (hWnd) ,GW_CHILD)  ; 
while (ClienthWnd) 

{ 

iRetval=0; 

SendMessage (ClienthWnd, wBLDWindowType, 0 , (LPARAM) (LPINT) siRetval) 
if  (iRetval  ==  BLDDLGCLIENT) 
break; 

ClienthWnd=GetWindow (ClienthWnd, GW_HWNDNEXT) ; 

} 

if (ClienthWnd) 

{ 

BLDMoveDlgClient (GetParent (hWnd) , ClienthWnd) ; 

} 

break; 

case  BLDDLGCLIENT: 

ClienthWnd=GetWindow (GetParent (hWnd) ,GW_CHILD) ; 
while (ClienthWnd) 

{ 

iRetval=0; 

SendMessage (ClienthWnd, wBLDWindowType, 0, (LPARAM) (LPINT) SiRetval) 
if  (iRetval  ==  BLDDLGCLIENT) 
break; 

ClienthWnd=GetWindow (ClienthWnd, GW_HWNDNEXT) ; 

} 

if (ClienthWnd) 

{ 

BLDMoveDlgClient (GetParent (hWnd) , ClienthWnd) ; 
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} 

} 

return  TRUE; 

} 


II  ************************************************************* 

II  FUNCTIONS  FOR  CONTROLS  AND  FONT 

II  ************************************************************* 

BOOL  BLDInitCtrlFontDef (HWND  hDlg, int  iCtrlId,int  nHeight,int  nWidth,int  nEscapement , 

int  nOrientation, int  fnWeight, BYTE  fbitalic, BYTE  fbUnderline, 
BYTE  fbStrikeOut, BYTE  fbCharSet , BYTE  fbOutputPrecision, 

BYTE  fbClipPrecision,BYTE  fbQuality, BYTE  fbPitchAndFamily, 
char  *lpszFace) 

{ 

HFONT  hFont ; 

HWND  CtrlhWnd; 

CtrlhWnd=GetDlgItem (hDlg, iCtrlld)  ; 

if { ! CtrlhWnd) 

return  FALSE; 

hFont=CreateFont (nHeight , nWidth,  nEscapement , 

nOrientation, fnWeight , fbitalic,  fbUnderline, 
fbStrikeOut,  fbCharSet, fbOutputPrecision, 
fbClipPrecision,  fbQuality, 
fbPitchAndFamily,  IpszFace) ; 

if (hFont) 

{ 

SetProp (CtrlhWnd, "BLDCTRLPROPHFONT", hFont) ; 

SendDlgltemMessage (hDlg,iCtrlId,WM_SETFONT, ( WP ARAM) hFont , (LPARAM) TRUE) ; 
return  TRUE; 

} 

return  FALSE; 

} 


BOOL  BLDExitCtrlFontDef (HWND  hDlg, int  iCtrlld) 

{ 

HFONT  hFont ; 

HWND  CtrlhWnd; 

CtrlhWnd=GetDlgItem (hDlg, iCtrlld)  ; 
if  (! CtrlhWnd) 

return  FALSE; 

hFont=GetProp (CtrlhWnd, "BLDCTRLPROPHFONT") ; 
if (hFont) 

{ 

SendDlgltemMessage (hDlg, iCtrlld, WM_SETFONT, (WPARAM)O, (LPARAM) FALSE) ; 
DeleteObject (hFont)  ; 

RemoveProp (CtrlhWnd, "BLDCTRLPROPHFONT") ; 
return  TRUE; 

} 

return  FALSE; 

} 


II  ************************************************************* 

II  FUNCTIONS  DIALOG  BOX  AND  CONTROLS  BACKGROUND 

II  ************************************************************* 

HBRUSH  BLDCtlColorBrushSetOrgDef (HWND  hWnd,HDC  hDC) 

{ 
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HBRUSH  hBrush; 

hBrush  = GetProp (hWnd, "BLDPROPHBRUSH" ) ; 
if  (hBrush) 

{ 

int  x,y,xScrolled,yScrolled; 

#ifdef  WIN32 

POINT  p; 

#else 

DWORD  dwOldBrushOrg; 

#endif 

UnrealizeOb ject (hBrush) ; 

#ifdef  WIN32 

GetBrushOrgEx (hDC, &p) ; 
x=p.x; 

y=p-y; 

#else 

dw01dBrush0rg=GetBrush0rg (hDC) ; 
x=LOWORD (dwOldBrushOrg)  ; 
y=HIWORD (dwOldBrushOrg) ; 

tendif 

BLDGetDlgScrolled (hWnd, &xScrolled, SyScrolled) ; 

xScrolled=-xScrolled+x; 

yScrolled=-yScrolled+y; 

#ifdef  WIN32 

SetBrushOrgEx (hDC, xScrolled, yScrolled, NULL)  ; 

#else 

SetBrushOrg (hDC, xScrolled, yScrolled) / 

#endif 

SelectObject (hDC, hBrush) ; 

} 

return  hBrush; 

} 


BOOL  BLDInitSolidBrushDef (HWND  hWnd, COLORREF  ColorRef) 

{ 

HBRUSH  hBrush; 

if  ( ! hWnd) 

return  FALSE; 

hBrush=CreateSolidBrush (ColorRef) ; 
if (hBrush) 

{ 

SetProp (hWnd, "BLDPROPHBRUSH" , hBrush) ; 
return  TRUE; 

} 

return  FALSE; 

} 


BOOL  BLDInitPatternBrushDef (HWND  hWnd, char  *pBitmapName) 

{ 

HBRUSH  hBrush; 

HBITMAP  hBitmap; 

if  (!hWnd) 

return  FALSE; 

hBitmap  = BLDLoadBitmap (hinst , pBitmapName) ; 
if (hBitmap) 


service . wxnc 


Wed  Mar  2 14:14:12  1994 


23 


{ 

hBrush  = CreatePatternBrush (hBitmap) ; 
DeleteOb ject (hBitmap) ; 
if (hBrush) 

{ 

SetProp (hWnd, "BLDPROPHBRUSH" , hBrush) ; 
return  TRUE; 

} 

} 

return  FALSE; 


} 


BOOL  BLDExitBrushDef (HWND  hWnd) 

{ 

HBRUSH  hBrush; 

if  ( ! hWnd) 

return  FALSE; 

hBrush=GetProp (hWnd, "BLDPROPHBRUSH") ; 
if  (hBrush) 

{ 

DeleteOb ject (hBrush) ; 
RemoveProp(hWnd, "BLDPROPHBRUSH")  ; 
return  TRUE; 

} 

return  FALSE; 

} 


HBRUSH  BLDCtlColorStockBrushDef (HWND  hWnd, int  fnObject) 

{ 

HBRUSH  hBrush; 

hBrush=GetStockOb ject (fnObject)  ; 
if (hBrush) 

return  hBrush; 

return  BLDCtlColorDefaultBrush (hWnd) ; 

} 


HBRUSH  BLDCtlColorPropBrushDef (HWND  hWnd) 

{ 

HBRUSH  hBrush; 

hBrush=GetProp (hWnd, "BLDPROPHBRUSH") ; 
if (hBrush) 

return  hBrush; 

return  BLDCtlColorDefaultBrush (hWnd) ; 

} 


HBRUSH  BLDCtlColorDef aultBrushDef (HWND  hWnd) 

{ 

HBRUSH  hBrush; 

hBrush  = BLDGetGlobalBrushDef (hWnd, 0 ) ; 

if  (hBrush) 

return  hBrush; 
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tifdef  WIN32 

hBrush= (HBRUSH) GetClassLong (hWnd, GCL_HBRBACKGROUND) 
#else 

hBrush= (HBRUSH) GetClassWord (hWnd, GCW_HBRBACKGROUND ) 
#endif 

if  (hBrush) 

return  hBrush; 

hBrush  = GetStockOb ject (WHITE_BRUSH) ; 
if (hBrush) 

return  hBrush; 
return  (HBRUSH) 0; 

} 


j I **************************************************** 

//  FUNCTIONS  FOR  HELP  HANDLING 

/ j **************************************************** 


static  BOOL  bHelp=FALSE; 


BOOL  BLDCheckFlHelpKeyDef (BOOL  bShift) 

{ 

if (GetKeyState (VK_F1)  >=  0) 
return  FALSE; 
if  (bShift ) 

{ 

if (GetKeyState (VK_SHIFT)  >=  0) 
return  FALSE; 

} 

else 

{ 

if (GetKeyState (VK_SHIFT)  < 0) 
return  FALSE; 

} 

if (GetKeyState (VK_CONTROL)  < 0) 
return  FALSE; 

if (GetKeyState (VK_MENU)  < 0) 
return  FALSE; 
return  TRUE; 

} 


void  BLDHelpTranslationDef (MSG  *pmsg) 

{ 

if (pmsg->message  ==  WM_KEYDOWN) 

{ 

if (BLDCheckFlHelpKey (TRUE) ) 

{ 

if (GetMenu (GetActiveWindow () ) ) 

{ 

HOURS OR  hCursor; 
bHelp=TRUE; 

hCursor=LoadCursor (hinst, "HELP")  ; 
if  (hCursor) 

{ 

SetCursor (hCursor) ; 

} 

} 

return; 

} 

if (BLDCheckFlHelpKey (FALSE)  ) 

{ 
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HWND  hActiveWnd; 
WPARAM  bFromMDIWnd; 


bHelp=FALSE; 

hActiveWnd=GetActiveWindow ( ) ; 
bFroinMDIWnd=FALSE; 
if (hMDIClient) 

{ 

if (hActiveWnd  ==  MainhWnd) 

{ 

HWND  hActiveMDIWnd; 

#ifdef  WIN32 

hActiveMDIWnd= (HWND) (SendMessage (hMDIClient, 
WM_MDIGETACTIVE,  0,  OL) ) ; 

#else 

hActiveMDIWnd= (HWND) LOWORD (SendMessage (hMDIClient, 
WM_MDIGETACTIVE, 0, OL) ) ; 

#endif 

if (hActiveMDIWnd) 


hActiveWnd=hActiveMDIWnd; 
bFroinMDIWnd=TRUE  ; 

} 

} 

} 

PostMessage (hActiveWnd, wHelpMessage, bFromMDIWnd, OL) ; 
return; 

} 

} 

} 


void  BLDShowHelpDef (HWND  hWnd,UINT  fuCommand, DWORD  dwData) 

{ 

char  szWinHelpFile [BLD_MAXPATH] ; 

BLDGetHelpFileName (szWinHelpFile)  ; 

SetCursor (LoadCursor (NULL, IDC_WAIT) ) ; 

WinHelp (hWnd, (LPSTR) szWinHelpFile, fuCommand, dwDat a) ; 

} 


BOOL  BLDHelpFilterDef (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  iParam, 

DWORD  dwHelpId, LPARAM  *plRetval, BOOL  bFromDlg) 

{ 

HCURSOR  hCursor; 

HWND  hCtrl; 

WORD  notification; 

HDC  hDC; 

static  HBRUSH  hGray  = 0; 

if  (dwDialogProp&BLDGRAY_DIALOGBOX) 

{ 

#ifdef  WIN32 

switch  (message) 

{ 

case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORMSGBOX : 

hCtrl  = (HWND) IParam; 

hDC  = (HDC) wParam; 

*plRetval  = (LPARAM) BLDGetGlobalBrushDef (hCtrl, hDC) ; 

return  FALSE; 

break; 

case  WM  CTLCOLOREDIT: 
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if  ( ! (dwDialogProp&BLDGRAY_EDIT) ) 
return  FALSE; 
break; 

case  WM_CTLCOLORBTN: 

if  ( ! (dwDialogProp&BLDGRAy_BUTTON) ) 
return  FALSE; 
break; 

case  WM_CTLCOLORSCROLLBAR: 

if  ( ! (dwDialogProp&BLDGRAY_SCROLLBAR) ) 
return  FALSE; 
break; 

case  WM_CTLCOLORSTATIC: 

if  ( ! (dwDialogProp&BLDGRAY_TEXT) ) 
return  FALSE; 
break; 

case  WM_CTLCOLORDLG: 
break; 

default : 

goto  HELPHANDLING; 
break; 

} 

#else 

switch  (message) 

{ 

case  WM_CTLCOLOR: 

switch  ( (int)  HIWORD (IParam) ) 

{ 

case  CTLCOLOR_LISTBOX: 
case  CTLCOLOR_MSGBOX : 

hCtrl  = (HWND) LOWORD  (IParam)  ; 

hDC  = (HDC)wParam; 

*plRetval  = BLDGetGlobalBrushDef (hCtrl, hDC) 

return  FALSE; 

break; 

case  CTLCOLOR_EDIT: 

if  ( ! (dwDialogProp&BLDGRAY_EDIT) ) 
return  FALSE; 
break; 

case  CTLCOLOR_BTN : 

if  ( ! (dwDialogProp&BLDGRAY_BUTTON) ) 
return  FALSE; 
break; 

case  CTLCOLOR_SCROLLBAR: 

if  ( ! (dwDialogProp&BLDGRAY_SCROLLBAR) ) 
return  FALSE; 
break; 

case  CTLCOLOR_STATIC: 

if  ( ! (dwDialogProp&BLDGRAY_TEXT) ) 
return  FALSE; 
break; 

case  CTLCOLOR_DLG : 

break; 
default : 

return  FALSE; 
break; 

} 

break; 

default : 

goto  HELPHANDLING; 
break; 

} 


#endif 

hDC  = (HDC)wParam; 
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SetBkColor (hDC,RGB{192,192,192) ) ; 
if  (IhGray) 

hGray  = GetStockObject (LTGRAY_BRUSH) ; 

*plRetval  = ( LP ARAM ) hGray; 

return  FALSE;  //  Don't  stop  other  processing 

} 

HELP HANDLING: 

if  { IbHelpSupport) 
return  FALSE; 

if (message==wHelpMessage) 

{ 

if (dwHelpId) 

{ 

BLDShowHelp  (hWnd,  HELP_CONTEXT,  dwHelpId)  ; 
return  TRUE; 

} 

else 

{ 

if (wP a ram)  //  It  is  a MDI  Child  window  with  no  dwHelpId 

PostMessage (MainhWnd, wHelpMessage, 0, OL) ; 

} 

} 

switch (message) 

{ 

case  WM_DESTROY: 

if (hWnd  ==  MainhWnd) 

BLDShowHelp (hWnd,HELP_QUIT, 0) ; • ‘ ■ 

break; 

case  WM_COMMAND: 
if (bHelp) 

{ 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) iParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam) ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

bHelp=FALSE; 

if ( ! (GetKeyState (VK_ESCAPE)  & 0x8000  )) 

{ 

if ( ! hCtrl&&  (notif ication==0 M notification==l ) ) //Menu  or  Accelerator 
BLDMenuHelp (hWnd, message, wP a ram, IParam) ; 

else 

PostMessage  (hWnd,  wHelpMessage,  0,  OL)  ; 

} 

#ifdef  WIN32 

SetCursor  ( (HCURSOR) GetClassLong (GetActiveWindow ( ) , GCL_HCURSOR) ) ; 

#else 

SetCursor ( (HCURSOR) GetClassWord (GetActiveWindow ( ) , GCW_HCURSOR) ) ; 

#endif 

*plRetval=TRUE; 
return  TRUE; 

} 

break; 

case  WM_ACTIVATE: 
bHelp=FALSE; 
break; 

case  WM_SETCURSOR: 
if (bHelp) 
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{ 

hCursor=LoadCursor (hinst , "HELP")  ; 
if (hCursor) 

{ 

SetCursor (hCursor) ; 

*plRetval=TRUE; 
if  (bFroiriDlg) 

SetWindowLong (hWnd, DWL_MSGRESULT, MAKELONG (TRUE,  0 ) ) ; 
return  TRUE; 

} 

} 

break; 

case  WM_KEYDOWN: 

if(wParam  ==  VK_ESCAPE  &&  bHelp) 

{ 

bHelp  = FALSE; 

#ifdef  WIN32 

SetCursor ( (HCURSOR) GetClassLong (GetActiveWindow ( ) , GCL_HCURSOR) ) ; 

#else 

SetCursor ( (HCURSOR) GetClassWord (GetActiveWindow ( ) , GCW_HCURSOR) ) ; 

#endif 

} 

break; 

case  WM_ENTERIDLE : 

if  ( (wParam  ==  MSGF_MENU)  &&  BLDCheckFlHelpKey (FALSE) ) 

{ 

bHelp  = TRUE; 

PostMessage (GetActiveWindow 0 , WM_KEYDOWN,  VK_RETURN,  OL) ; 
*plRetval=FALSE ; 
return  TRUE; 

' } 

if (BLDCheckFlHelpKey (TRUE) ) 

{ 

if (GetMenu (GetActiveWindow ( ) ) ) 

{ 

bHelp=TRUE; 

hCursor=LoadCursor (hinst, "HELP") ; 
if (hCursor) 

{ 

SetCursor (hCursor) ; 

} 

} 

*plRetval=FALSE ; 
return  TRUE; 

} 

if (BLDCheckFlHelpKey (FALSE) ) 

{ 

bHelp=FALSE; 

PostMessage (GetActiveWindow ( ) , wHelpMessage, 0 , OL) ; 

*plRetval=FALSE; 
return  TRUE; 

} 

if (bHelp  &&  (wParam  ==  MSGF_DIALOGBOX)  ) 

{ 

if (GetKeyState (VK_ESCAPE)  & 0x8000  ) 

{ 

bHelp  = FALSE; 

#ifdef  WIN32 

SetCursor ( (HCURSOR) GetClassLong (GetActiveWindow ( ) , GCL_HCURSOR) ) 

#else 

SetCursor ( (HCURSOR) GetClassWord (GetActiveWindow ( ) , GCW_HCURSOR) ) 

} 

*plRetval=FALSE; 


#endif 
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return  TRUE; 

} 

break; 

} 

return  FALSE; 

} 


HBRUSH  BLDGetGlobalBrushDef (HWND  hCtrl,HDC  hDC) 

{ 

char  szClass[21]; 
static  HBRUSH  hGray  = 0; 

if  ChCtrl) 

return  0 ; 

if  (! hGray) 

hGray  = GetStockObject (LTGRAY_BRUSH) ; 

if  ( ! GetClassName (hCtrl, szClass, 20) ) 
return  0 ; 

if  (Istrcmpi (szClass, "EDIT") ==0) 

{ 

if  (dwDialogProp&BLDGRAY_EDIT) 
goto  RETGRAYBRUSH; 

else 

return  0 ; 

} 

if  (Istrcmpi (szClass, "COMBOBOX") ==0) 

{ 

if  (dwDialogProp&BLDGRAY_COMBOBOX) 
goto  RETGRAYBRUSH; 

else 

return  0; 

} 

if  (Istrcmpi (szClass, "LISTBOX" ) ==0 ) 

{ 

if  (dwDialogProp&BLDGRAY_LISTBOX) 
goto  RETGRAYBRUSH; 

else 

return  0; 

} 

if  (Istrcmpi (szClass, "BUTTON") ==0) 

{ 

if  ( (dwDialogProp&BLDGRAY_BUTTON) ) 
goto  RETGRAYBRUSH; 

else 

return  0; 

} 

if  (Istrcmpi (szClass, "SCROLLBAR" ) ==0 ) 

{ 

if  (dwDialogProp&BLDGRAY_SCROLLBAR) 
goto  RETGRAYBRUSH; 

else 

return  0; 

} 

if  (Istrcmpi (szClass, "STATIC") ==0) 

{ 

if  (dwDialogProp&BLDGRAY_TEXT) 
goto  RETGRAYBRUSH; 

else 


return  0 ; 
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} 

return  0 ; 

RETGRAYBRUSH : 
if  (hDC) 

SetBkColor (hDC,RGB(192,192,192)  ) ; 
return  hGray; 

} 


LRESULT  BLDDefWindowProcMsgDef (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

if ( ! hMDIClient ) 

return  DefWindowProc (hWnd,  message,  wParam,  IParam); 
if (hWnd  ==  MainhWnd) 

return  DefFrameProc (hWnd,  hMDIClient,  message,  wParam,  IParam); 
if {GetParent (hWnd)  ==  hMDIClient) 

return  DefMDIChildProc (hWnd,  message,  wParam,  IParam); 
return  DefWindowProc (hWnd,  message,  wParam,  IParam); 

} 


II  ************************************************************* 

//  FUNCTIONS  AND  GLOBAL  VARIABLES  FOR  HANDLING 

//  OF  MULTIPLE  INSTANCES  OF  TOOLBARS  AND 

//  CLIENT  AREA  CONTROLS 

II  ************************************************************* 


Static  HANDLE  BLDhClientDlghMem  = 0; 
static  int  BLDhClientDlgCount  = 0; 


typedef  struct  tagBLDCLIENTITEM 

{ 

HWND  hDlg; 

DLGPROC  IpProc; 

}BLDCLIENTITEM; 


BOOL  BLDAddClientDlgDef (HWND  hDlg, DLGPROC  IpProc) 

{ 

BLDCLIENTITEM  FAR  *lpClientItem; 
if  ( ! BLDhClientDlghMem) 

BLDhClientDlghMem=GlobalAlloc (GMEM_MOVEABLE, 1)  ; 

BLDhClientDlghMem=GlobalReAlloc (BLDhClientDlghMem, (BLDhClientDlgCount  +2) *sizeof (BLDCL 
lENTITEM) , GMEM_MOVEABLE ) ; 

if ( ! BLDhClientDlghMem) 
return  FALSE; 

IpClientltem  = (BLDCLIENTITEM  FAR  *) GlobalLock (BLDhClientDlghMem) ; 
if ( ! IpClientltem) 
return  FALSE; 

IpClientltem  +=  BLDhClientDlgCount; 

lpClientItem->hDlg=hDlg; 

lpClientItem->lpProc=lpProc; 

GlobalUnlock (BLDhClientDlghMem) ; 

BLDhClientDlgCount++ ; 
return  TRUE; 

} 
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BOOL  BLDRemoveClientDlgDef (HWND  hDlg) 

{ 

BLDCLIENTITEM  FAR  *lpClientItem; 

BLDCLIENTITEM  FAR  *lpClientItem2 ; 

LPSTR  Ipstr; 

int  iFound; 

int  i; 

Ipstr  = (LPSTR) GlobalLock (BLDhClientDlghMem) ; 
if ( ! Ipstr) 

return  FALSE; 
iFound=  -1; 

for(i  =0;  i < BLDhClientDlgCount  &&  iFound  ==  -1;  i++) 

{ 

lpClientItem= (BLDCLIENTITEM  FAR  *)lpstr+i; 
if (lpClientItem->hDlg  ==  hDlg) 

{ 

FreeProcInstance ( (FARPROC) lpClientItem->lpProc) ; 
iFound  = i; 

} 

} 

if (iFound  ==  -1) 

{ 

GlobalUnlock (BLDhClientDlghMem) ; 
return  FALSE; 

} 

f or (i=iFound+l;  i < BLDhClientDlgCount ; i++) 

{ 

lpClientItem= (BLDCLIENTITEM  FAR  *)lpstr+i; 
lpClientItem2==  (BLDCLIENTITEM  FAR  *)lpstr+i-l; 
lpClientItem2->hDlg  = lpClientItem->hDlg; 
lpClientItem2->lpProc  = lpClientItem->lpProc; 

} 

GlobalUnlock (BLDhClientDlghMem)  ; 

BLDhClientDlgCount  — ; 
if (BLDhClientDlgCount) 

BLDhClientDlghMem=GlobalReAlloc (BLDhClientDlghMem, (BLDhClientDlgCount) *sizeof (BLDC 
LIENTITEM) , GMEM_MOVEABLE) ; 
else 

{ 

GlobalFree (BLDhClientDlghMem) ; 

BLDhClientDlghMem=0 ; 

} 

return  TRUE; 

} 


BOOL  BLDIsClientDlgDialogMessageDef (MSG  *pMsg) 

{ 

BLDCLIENTITEM  FAR  *lpClient Item; 

LPSTR  Ipstr; 

int  i ; 

if ( ! BLDhClientDlghMem) 
return  FALSE; 

Ipstr  = (LPSTR) GlobalLock (BLDhClientDlghMem) ; 
if ( ! Ipstr) 

return  FALSE; 

for(i  =0;  i < BLDhClientDlgCount  ; i++) 

{ 

lpClientItem= (BLDCLIENTITEM  FAR  *)lpstr+i; 
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if (IsDialogMessage (lpClientItem->hDlg, pMsg) ) 

{ 

GlobalUnlock (BLDhClientDlghMem) ; 
return  TRUE; 


} 

} 

GlobalUnlock (BLDhClientDlghMem) ; 
return  FALSE; 

} 
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//  Filename:  USERCODE. WMC 

//  "EAMAT42"  Generated  by  WindowsMAKER  Professional. 

//  Author:  Laura  L.  Downey 

// 

II  ************************************* ********************************** 

//Do  not  add  code  here.  Add  code  in  the  .C  file. 

// 

//  This  file  is  maintained  by  WindowsMAKER  Professional. 

//As  you  make  changes  in  your  application  using  WindowsMAKER  Professional, 
//  this  file  is  automatically  updated,  therefore  you  never  modify  this  file. 
// 

// 

// 

//  For  more  information, 

//  see  the  section  "How  code  is  generated”  in  the  documentation. 

// 

II  *********************************************************************** 

// 


II  *************************************************************** 

//  Modal  Dialog  Box:  QUERY 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_QUERYDlgFuncDef (HWND  hWnd,char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_QUERYDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgNamePszDlgName : "QUERY" ) , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_Cannot Create, (szDlgName?szDlgName : "QUERY") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_QUERYDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0 , SbRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush(hDlg,RGB(192,192,192)  ) ; 

BLDInitSolidBrush(GetDlgItem(hDlg,109) , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgl tern (hDlg, 115) ,RGB (192,192,192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 119) , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgItem(hDlg, 116) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 121) ,RGB (192, 192,192)  ) ; 
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BLDInitSolidBrush(GetDlgItem(hDlg, 117) , RGB (192, 192, 192) ) 
break; 

case  WM_COMd?^ND : 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam)  ; 

hCtrl  - (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam) ; 

#else 

notification  = HIWORD (IParam)  ; 

fendif 

if (! hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand(hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  1: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD__OKDlgFunc (hDlg, message, wParam, IParam) ; 
EndDialog (hDlg, 1 ) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
case  2 : 

switch (notification) 

{ 

case  BN__CLICKED: 

EndDialog (hDlg, 2) ; 
return  TRUE; 
break ; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDr awl tern; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
if (BLDDrawItem (hDlg, IpDrawItem)  ) 
return  TRUE; 

} 

break; 

break; 
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case  WM_DESTROY: 

BLDExitBrush (hDlg) ; 

BLDExitBrush (GetDlgltem (hDlg,  109)  ) ; 

BLDExitBrush {GetDlgItein(hDlg, 115) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 119) ) ; 

BLDExitBrush (GetDlgItem(hDlg, 116) ) ; 

BLDExitBrush (GetDlgl tern (hDlg, 121 ) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 117) ) ; 
break; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX: 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN: 
case  WM_CTLCOLORDLG : 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

/ / Extracting  data  from  message 

{ 

HWND  hCtrl; 

#ifdef  WIN32 

hCtrl  = (HWND) IParam; 

#else 

hCtrl  = (HWND) LOWORD (IParam) ; 

#endif 

#ifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC)wParam) 

#else 

if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC)wParam) 

#endif 

switch (GetDlgCtrllD (hCtrl) ) 

{ 

case  109: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  115: 

SetTextColor ( (HDC) wParam, RGB (0, 0, 128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  119: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  116: 

SetTextColor ( (HDC) wParam, RGB (0,0,128) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  121: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
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case  117: 

SetTextColor ( (HDC) wParam,RGB (0, 0, 128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
brealc; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Controls  in  Main  Window:  MAIN 

II  *************************************************************** 

II  Startup  procedure  for  client  dialog  box 

HWND  BLD_MAINClFuncDef (HWND  hWnd, char  *S2DlgName, UINT  message) 

{ 

if (MAINhDlgS&IsWindow (MAINhDlg) ) 

{ 

return  MAINhDlg; 

} 

MAINlpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_MAINClProc, hinst ) ; 
MAINhDlg  = BLDCreateClientDlg ( (szDlgName?S2DlgName: "MAIN") f 

hWnd, message , MAINlpP  roc , BLDDLGCLIENT , TRUE ) 

if  (MAINhDlg==0)  ■ 

BLDDisplayMessage (hWnd, BLD_Cannot Create, (S2DlgName?S2DlgName : "MAIN") , 
MB_OK  I MB_ICONHAND)  ; 

else 

ShowWindow (MAINhDlg, SW_SHOW) ; 
return  MAINhDlg; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_MAINDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGCLIENT, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

if  (GetParent (hDlg) ) 

BLDMoveDlgClient (GetParent (hDlg) ,hDlg) ; 
break; 

case  WM_COMMAND : 

{ 

WORD  wid; 

WORD  notification; 
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/ / Extracting  data  from  message 
wid  = LOWORD (wParam)  ; 

fifdef  WIN32 

notification  = HIWORD (wParam) ; 

#else 

notification  = HIWORD (iParam)  ; 

tendif 


switch (wId) 

{ 

case  125: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_QUERYDlgFunc (hDlg, message, wParam, IParam) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
case  126: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_BrowseEntryDlgFunc (hDlg, message,  wParam,  IParam) 
return  TRUE; 
break; 
default : 
break; 

• } 

break; 
case  127: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_PrintDlgFunc (hDlg, message, wParam, IParam) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
case  128: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_Function2DlgFunc (hDlg, message, wParam,  IParam) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
case  130: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_ReportDlgFunc (hDlg, message, wParam, IParam) ; 
return  TRUE; 
break; 
default : 
break; 

} 
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break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 

} 

break; 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  PRINT 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_PrintDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_PrintDlgProc, hinst)  ; 
ReturnValue  = DialogBox (hinst , (LPSTR)  (szDlgName?szDlgName : "PRINT”) , 

hWnd, IpProc ) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate,  (szDlgName?szDlgName : "PRINT")  , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_PrintDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam,  IParam, BLDDLGMODAL, 0 , SbRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush (hDlg, RGB (192, 192, 192)  ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 116) ,RGB (192,  192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 109) , RGB (192,  192, 192)  ) ; 
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BLDInitSolidBrush (GetDlgltem (hDlg, 115) , RGB (192, 192, 192) ) 
BLDInitSolidBrush (GetDlgltem (hDlg,  118) , RGB (192,192,192)  ) 
BLDInitSolidBrush (GetDlgltem (hDlg, 121) , RGB (192, 192, 192) ) 
break; 

case  WM_COMMAND: 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam) ; 

hCtrl  = (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam)  ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  1 : 

switch (notification) 

{ 

case  BN_CLI.CKED: 

EndDialog(hDlg,l) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 

} 

break; 

break; 

case  WM_DESTROy: 

BLDExitBrush (hDlg) ; 

BLDExitBrush (GetDlgltem (hDlg,  116)  ) ; 

BLDExitBrush (GetDlgltem (hDlg,  109)  ) ; 

BLDExitBrush (GetDlgltem (hDlg,  115)  ) ; 

BLDExitBrush (GetDlgltem (hDlg, 118)  ) ; 

BLDExitBrush (GetDlgltem (hDlg, 121)  ) ; 
break; 


#ifdef  WIN32 
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case  WM_CTLCOLORMSGBOX: 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN : 
case  WM_CTLCOLORDLG : 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 

{ 

HWND  hCtrl; 

#ifdef  WIN32 

hCtrl  = (HWND) IParam; 

#else 

hCtrl  = (HWND) LOWORD (IParam) ; 

#endif 

#ifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg,  (HDC) wParam)  ; 

#else 

if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC) wParam) ; 

#endif 

switch (GetDlgCtrllD (hCtrl)  ) 

{ 

case  116: 

SetTextColor ( (HDC) wParam, RGB (0, 0, 128)  ) ; 

SetB)cMode  ( (HDC)  wParam,  TRANSPARENT)  ; 
return  (BOOL)'BLDCtlColorPropBrush  (hCtrl)  ; 
break; 
case  109: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  115: 

SetTextColor ( (HDC) wParam, RGB (0, 0, 128) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl ) ; 
break; 
case  118: 

SetTextColor ( (HDC) wParam,  RGB (0,0,128) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl)  ; 
break; 
case  121: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet; 

} 


//  No  explicit  return  - return  default 
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II  *************************************************************** 

II  Modal  Dialog  Box:  QINFO 

II  *************************************************************** 

II  Startup  procedure  for  modal  dialog  box 
int  BLD_OKDlgFuncDef (HWND  hWnd, char  *S2DlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_OKDlgProc, hinst) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName : "QINFO”) , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_Cannot Create, (szDlgName?szDlgName : "QINFO") , 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_OKDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush (hDlg, RGB (224, 223, 225)  ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg,  147) , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 149) , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 137) , RGB (192, 192,  192) ) ; 
BLDInitCtrlFont (hDlg, 137 , -12 , 0 , 0 , 0 , 700 , 0 , 0 , 0,  0, 3, 2, 1, 34,  "Arial")  ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 150) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 151) , RGB (192, 192,192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 152) ,RGB (192,192,192)); 
BLDInitSolidBrush (GetDlgltem (hDlg, 153) ,RGB (192,192, 192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 154) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 155) , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 158) , RGB (192, 192, 192)  ) ; 
BLDInitCtrlFont (hDlg, 158,-11, 0,0, 0,700, 0,0,0, 0, 3, 2, 1, 34, "Arial") ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 160) , RGB (192, 192, 192 ) ) ; 
BLDInitCtrlFont (hDlg, 160, -11, 0, 0, 0, 700, 0, 0, 0, 0, 3, 2, 1, 34, "Arial") ; 
BLDInitSolidBrush  (GetDlgltem (hDlg,  162)  , RGB  (192, 192,192)')  ; 
BLDInitCtrlFont  (hDlg,  162,  -11, 0, 0, 0, 700, 0, 0, 0,  0,  3, 2, 1, 34,  "Arial")  ; 
break; 

case  WM_COMMAND: 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 


//  Extracting  data  from  message 
wId  = LOWORD (wParam)  ; 

hCtrl  = (HWND) (UINT) IParam; 
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#ifdef  WIN32 

notification  = HIWORD (wParam) ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  124: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_HeaderDetailDlgFunc (hDlg, message, wParam, IParam) 
return  TRUE; 
break; 
default : 
break; 

} 

break; 

case  ID_QRepTot : 

switch (notification) 

{ 

case  BN_CLICKED: 

BIiD_ReportTotalsDlgFunc  (hDlg,  message,  wParam,  IParam) 
return  TRUE; 
break; 
default: 
break; 

} 

break; 
case  159: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_qparamDlgFunc (hDlg,message, wParam, IParam)  ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IP a ram; 
switch (lpDrawItem->CtlID) 

{ 

case  ID_Change : 

if  ( IpDrawI tem->itemAct ion==ODA_DRAWENTIRE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARR", TRUE) ; 
return  TRUE; 
break; 
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case  159: 

if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "PARAM", TRUE) ; 
return  TRUE; 
break; 
default : 

if  (BIiDDrawItem(hDlg,  IpDrawItem)  ) 
return  TRUE; 
break; 

} 

} 

break; 

case  WM_DESTROY: 

BLDExitBrush (hDlg) ; 

BLDExitBrush (GetDlgltem (hDlg,  147) ) ; 

BLDExitBrush (GetDlgItem(hDlg, 149)  ) ; 

BLDExitCtrlFont (hDlg, 137) ; 

BLDExitBrush (GetDlgltem (hDlg, 137) ) ; 

BLDExitBrush (GetDlgltem (hDlg,  150)  ) ; 

BLDExitBrush (GetDlgItem(hDlg, 151)  ) ; 

BLDExitBrush (GetDlgltem (hDlg,  152 ) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 153)  ) ; 

BLDExitBrush (GetDlgltem (hDlg,  154)  ) ; 

BLDExitBrush (GetDlgltem (hDlg, 155) ) ; 

BLDExitBrush (GetDlgltem (hDlg,  156)  ) ; 

BLDExitCtrlFont (hDlg,  158); 

BLDExitBrush (GetDlgltem (hDlg,  158)  ) ; 

BLDExitCtrlFont (hDlg, 160) ; 

BLDExitBrush (GetDlgltem (hDlg,  160)  ) ; 

BLDExitCtrlFont (hDlg, 162)  ; 

BLDExitBrush (GetDlgltem (hDlg, 162) ) ; 
break; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX : 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN: 
case  WM_CTLCOLORDLG: 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 

{ 

HWND  hCtrl; 

#ifdef  WIN32 

hCtrl  = (HWND) iParam; 

#else 

hCtrl  = (HWND) LOWORD (IParam) ; 

#endif 

#ifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC)wParam) 

#else 

if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC)wParam) 

#endif 

switch (GetDlgCtrllD (hCtrl) ) 

{ 
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case  147: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)); 
SetBJcMode  ( (HOC)  wParam,  TRANSPARENT)  ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  149: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)  ) ; 
SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  132: 

SetTextColor ( (HDC) wParam, RGB (0, 0 , 128)  ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  140: 

SetTextColor ( (HDC) wParam, RGB (0,0,128) ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl ) 
break; 
case  136: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  141: 

SetTextColor ( (HDC) wParam, RGB (0, 0, 128) ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  143: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128) ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl ) 
break; 
case  133: 

SetTextColor ( (HDC) wParam, RGB (0, 0, 128) ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  134: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128) ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  135: 

SetTextColor ( (HDC) wParam, RGB (0,  0, 128)  ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  139: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  137: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl)  ; 
break; 
case  150: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  151: 
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SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  152: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  153: 

SetBkMode ( (HDC) wParam, TRANSPARENT)  ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl)  ; 
break; 
case  154: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  155: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  156: 

SetBkColor ( (HDC) wParam, RGB (255, 255, 255) ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 

return  (BOOL) BLDCtlColorStockBrush (hCtrl, WHITE_BRUSH) ; 
break; 
case  158: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  160: 

SetTextColor ( (HDC) wParam, RGB (0,0,128) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  162: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


j j *************************************************************** 

//  Modal  Dialog  Box:  MAINl 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_FunctionDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_FunctionDlgProc, hinst ) 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgNameTszDlgName : "MAINl") , 

hWnd, IpProc)  ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l ) 
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BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgNaine : "MAINl") , 
MB_OK  1 MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_FunctionDlgDef ault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush (hDlg, RGB (192, 192, 192) ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 116) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 106) , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 123) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 124) ,RGB (192,192,192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 121) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 114) , RGB (192 , 192 , 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 117) ,RGB (192,192,192) ) ; 
break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND) (UINT) IParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (IpDrawItem- >CtlID) 

{ 

case  100: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  ( IpD  r awl tern- >C 1 1 Type==OD  T_BUTTON ) 

BLDDrawBitmap (IpDrawItem, "WELCOME", TRUE) ; 
return  TRUE; 
break; 
case  115: 

if  ( IpDrawI tem->itemAct ion==ODA_DRAWENTIRE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ARCHES", TRUE) ; 
return  TRUE; 
break; 
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default : 

if (BLDDrawItem(hDlg, IpDrawItem)  ) 
return  TRUE; 
break; 

} 

} 

break; 

case  WM_DESTROY: 

BLDExitBrush (hDlg) ; 

BLDExitBrush (GetDlgItem(hDlg,  116)  ) ; 

BLDExitBrush (GetDlgltem (hDlg, 106)  ) ; 

BLDExitBrush (GetDlgltem (hDlg, 123) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 124) ) ; 

BLDExitBrush (GetDlgltem (hDlg,  121)  ) ; 

BLDExitBrush (GetDlgltem (hDlg,  114)  ) ; 

BLDExitBrush (GetDlgltem (hDlg, 117) ) ; 
break; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX: 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN: 
case  WM_CTLCOLORDLG : 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 

{ 

HWND  hCtrl; 

#ifdef  WIN32 

hCtrl  = (HWND) IParam; 

#else 

hCtrl  = (HWND)  LOWORD  (IParam)  ; 

#endif 

#ifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC)wParam) 

#else 

if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC)wParam) 

#endif 

switch (GetDlgCtrllD (hCtrl)  ) 

{ 

case  116: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  106: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  123: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  124: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 


usercode . wmc 


Wed  Mar  2 14:14:19  1994 


16 


case  121: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  114: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  117: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


/ j *************************************************************** 

//  Modal  Dialog  Box:  EXIT 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_Function2DlgFuncDef (HWND  hWnd, char  *S2DlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_Function2DlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgNamePszDlgName : "EXIT" ) , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage(hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "EXIT") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_Function2DlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0 , &bRet ) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush(hDlg,RGB(224,223,225)  ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 100) , RGB (224, 223, 225) ) ; 

BLDInitCtrlFont (hDlg, 100, -16, 0, 0,0,700,0,0,0,0,3,2,1,34, "Arial") ; 
break; 
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case  WM_COMMAND: 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam) ; 

hCtrl  = (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam)  ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

if (! hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand(hDlg, message, wParam, IParam)  ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  1 : 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_QuitFuncUDCFunc (hDlg, message, wParam, IParam) 
EndDialog (hDlg, 1 ) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
case  2: 

switch (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg, 2 ) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IP a ram; 
switch (lpDrawItem->CtlID) 

{ 

case  102: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 
BLDDrawIcon (IpDrawItem, "EXIT2") ; 
return  TRUE; 
break; 
case  104: 
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if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "X",TRUE) ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 


case  WM_DESTROY: 

BLDExitBrush (hDlg) ; 

BLDExitCtrlFont (hDlg, 100)  ; 

BLDExitBrush (GetDlgltem (hDlg, 100) ) ; 
break; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX : 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN : 
case  WM_CTLCOLORDLG: 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 

{ 

HWND  hCtrl; 

tifdef  WIN32 

hCtrl  = (HWND) iParam; 

#else 

hCtrl  = (HWND) LOWORD (IParam) ; 

tendif 

#ifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC) wParam) ; 

^else 

if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg,  (HDC) wParam)  ; 

tendif 

switch (GetDlgCtrllD (hCtrl) ) 

{ 

case  100: 

SetBkColor  ( (HDC) wParam, RGB (192 , 192 , 192 ) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

} 

} 

break; 


default : 
break; 

} 

return  bRet; 

} 


//  No  explicit  return 


return  default 
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j j *************************************************************** 

II  Modal  Dialog  Box:  BINFO 

II  *************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_Function6DlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_Function6DlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName: "BINFO") , 

hWnd, IpProc)  ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "BINFO") , 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_Function6DlgDefault (HWND  hDlg^UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, &bRet) ) 
return  bRet; 

switch (message) 

{ 


case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush(hDlg,RGB(224,223,225) ) ; 

BLDInitSolidBrush(GetDlgItem(hDlg, 147) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 149) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgItem(hDlg, 137) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 150) ,RGB (192,192,192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 151) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 152) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 153) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg,  154) , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgItem(hDlg, 155) , RGB (192, 192, 192)  ) ; 
break; 


case  WM_COMMAND: 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 


#ifdef 

#else 

#endif 


//  Extracting  data  from  message 
wId  = LOWORD (wParam)  ; 

hCtrl  = (HWND) (UINT) lParam; 

WIN32 

notification  = HIWORD (wParam) ; 


notification  = HIWORD (IParam) ; 

if (! hCtrl)  //  Menu  input  or  CR 

{ 
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if  (BLDMenuCommand (hDlg, message, wParam, iParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  124: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_HeaderDetailDlgFunc (hDlg, message, wParam, IParam) 
return  TRUE; 
break; 
default : 
break; 

} 

break; 

case  ID_BRepTot : 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_ReportTotalsDlgFunc (hDlg, message, wParam, IParam) 
return  TRUE; 
break; 
default : 
break; 

} 

break; 

case  IDPRINTB: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_PrintBlanketDlgFunc (hDlg, message, wParam, IParam) 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IP a ram; 
if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 

} 

break; 

break; 

case  WM_DESTROY: 

BLDExitBrush (hDlg) ; 

BLDExitBrush (GetDlgltem (hDlg, 147) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 149) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 137) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 150) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 151 ) ) ; 

BLDExitBrush (GetDlgltem  (hDlg, 152) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 153) ) ; 
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BLDExitBrush (GetDlgItem(hDlg, 154 ) ) ; 

BLDExitBrush (GetDlgItem(hDlg,  155)  ) ; 

BLDExitBrush (GetDlgItem(hDlg,  156)  ) ; 
breaJc; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX: 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN: 
case  WM_CTLCOLORDLG: 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 

{ 

HWND  hCtrl; 

#ifdef  WIN32 

hCtrl  = (HWND) iParam; 

#else 

hCtrl  = (HWND) LOWORD (IParam) ; 

#endif 

#ifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg,  (HDC) wParam)  ; 

#else 

if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC) wParam) ; 

#endif 

switch (GetDlgCtrllD (hCtrl) ) 

{ 

case  147: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)); 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  149: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  132: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl)  ; 
break; 
case  140: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl) ; 
break; 
case  136: 

SetTextColor ( (HDC) wParam, RGB (0 , 0, 128)  ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl) ; 
break; 
case  141: 

SetTextColor ( (HDC) wParam, RGB ( 0, 0, 128)  ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 

return  (BOOL) BLDCtlColorDefaultBrush (hCtrl) ; 

break; 
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case  143: 

SetTextColor ( (HDC) wParam, RGB (0, 0, 128) ) ; 

SetBJcMode  ( (HDC)  wParam,  OPAQUE)  ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl) ; 
break; 
case  133: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128) ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl) ; 
break; 
case  134: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl) ; 
break; 
case  135: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl) ; 
break; 
case  139: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl ) ; 
break; 
case  137: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  150: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl ) ; 
break; 
case  151: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl ) ; 
break; 
case  152: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl ) ; 
break; 
case  153: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl ) ; 
break; 
case  154: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl ) ; 
break; 
case  155: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  156: 

SetBkColor ( (HDC) wParam, RGB (255, 255, 255)  ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 

return  (BOOL) BLDCtlColorStockBrush (hCtrl, WHITE_BRUSH) 
break; 

} 

} 

break; 

default : 
break; 
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} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  **************************************************************** 

//  Modal  Dialog  Box:  HDETAIL 

II  *************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_HeaderDetailDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_HeaderDetailDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hlnst , (LPSTR) (szDlgName?szDlgName: "HDETAIL") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, {szDlgName?szDlgName : "HDETAIL") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_HeaderDetailDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam)  ; 

hCtrl  = (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam) ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

if (! hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 
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case  IDPRINTHD: 

switch (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg, IDPRINTHD) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
case  101: 

switch (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg, 101 ) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch  (lpDrawItem->CtlID) 

{ 

case  104: 

if  (lpDrawItem->iteniAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon  (IpDrawItem, "FFIND") ; 
return  TRUE; 
break; 
case  106: 

if  (lpDrawItem->iteinAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "FFIND") ; 
return  TRUE; 
break; 
default : 

if  (BLDDrawItem(hDlg, IpDrawItem)  ) 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


II  *************************************************************** 

//  Modal  Dialog  Box:  EDETAIL 
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II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BIjD_EmployeeDetailDlgFuncDef  (HWND  hWnd,  char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_EmployeeDetailDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName: "EDETAIL") , 

hWnd, IpProc)  ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "EDETAIL") , 
MB_OK  I MB_ICONHAND)  ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_EmployeeDetailDlgDef ault (HWND  hDlg^UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg,  message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM__COMMAND: 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam)  ; 

hCtrl  = (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam)  ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

if (! hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam)  ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  101: 

switch  (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg,  101)  ; 
return  TRUE; 
break; 
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default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) iParam; 
switch (lpDrawItem->CtlID) 

{ 

case  104: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "FFIND") ; 
return  TRUE; 
break; 
case  106: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem,  "FFIND") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) ' 
return  TRUE; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


II  ************************************************ *************** 

//  Modal  Dialog  Box:  BRREPORT 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_BrowseReportDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_BrowseReportDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgNamePszDlgName : "BRREPORT" ) , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_Cannot Create, (szDlgName?szDlgName : "BRREPORT") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 
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//  Default  dialog  box  procedure 

BOOL  BLD_BrowseReportDlgDefault (HWND  hDlg/UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, SbRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush(hDlg,RGB(224,223,225) ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 147) ,RGB (192,192,192) ) ; 

BLDInitSolidBrush (GetDlgItem(hDlg, 149) , RGB (192, 192, 192) ) ; 

BLDInitSolidBrush (GetDlgItem(hDlg, 137)  , RGB (192, 192, 192) ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 150) , RGB (192, 192, 192) ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 151) , RGB (192, 192, 192) ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 152) , RGB (192, 192, 192) ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 153) , RGB (192, 192, 192) ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 154) , RGB (192, 192, 192) ) ; 

BLDInitSolidBrush (GetDlgItem(hDlg, 155) , RGB (192, 192, 192) ) ; 
break; 

case  WM_COMMAND: 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

/ / Extracting  data  from  message 
wId  = LOWORD (wParam) ; 

hCtrl  = (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam) ; 

#else 

notification  = HIWORD  (IParam) ; 

#endif 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  124: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_HeaderDetailDlgFunc (hDlg, message, wParam, IParam) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 

case  ID_BrRepTot: 

switch (notification) 

{ 

case  BN  CLICKED: 
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BLD_ReportTotalsDlgFunc (hDlg, message, wP a ram, iParam) 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
if (BLDDrawItem(hDlg, IpDrawItem) ) 
return  TRUE; 

} 

break; 

break; 

case  WM_DESTROY: 

BLDExitBrush (hDlg) ; 

BLDExitBrush (GetDlgltem (hDlg, 147) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 149) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 137) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 150) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 151) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 152) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 153) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 154) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 155) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 156) ) ; 
break; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX : 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN: 
case  WM_CTLCOLORDLG: 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 

{ 

HWND  hCtrl; 

tifdef  WIN32 

hCtrl  = (HWND) IParam; 

#else 

hCtrl  = (HWND) LOWORD (IParam) ; 

#endif 

#ifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg,  (HDC) wParam)  ; 

#else 

if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC) wParam) ; 
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#endif 

switch (GetDlgCtrllD (hCtrl)  ) 

{ 

case  147: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)); 
SetBkMode ( (HDC) wParam,  TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  149: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)  ) ; 
SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  132: 

SetTextColor ( (HDC) wParam, RGB (0,  0, 128) ) ; 
SetBkMode ( (HDC) wParam,  OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  140: 

SetTextColor ( (HDC) wParam, RGB (0, 0, 128) ) ; 
SetBkMode ( (HDC) wParam,  OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  136: 

SetTextColor ( (HDC) wParam, RGB (0, 0, 128) ) ; 
SetBkMode ( (HDC) wParam,  OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  141: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128)  ) ; 
SetBkMode ( (HDC> wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  143: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128)  ) ; 
SetBkMode ( (HDC) wParam,  OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  133: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128)  ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  134: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  135: 

SetTextColor ( (HDC) wParam, RGB (0,0,128) ) ; 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  139: 

SetTextColor ( (HDC) wParam, RGB (0, 0, 128)  ) ; 
SetBkMode ( (HDC) wParam,  OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  137: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  150: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 


usercode . vnnc 


Wed  Mar  2 14:14:19  1994 


30 


return  (BOOL) BLDCtlColorPropBrush (hCtrl ) / 
break; 
case  151: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  152: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  153: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  154: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl ) ; 
break; 
case  155: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  156: 

SetBkColor ( (HDC) wParam, RGB (255 , 255 , 255 ) ) ; 

SetBkMode ( (HDC) wParam, OPAQUE) ; 

return  (BOOL) BLDCtlColorStockBrush (hCtrl, WHITE_BRUSH) ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


11  *************************************************************** 

//  Modal  Dialog  Box:  STATISTICS 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_ReportStatisticsDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_ReportStatisticsDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?S2DlgName: "STATISTICS") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "STATISTICS" ) , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_ReportStatisticsDlgDef ault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL 


bRet ; 
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bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg,  message, wParam, IParam, BLDDLGMODAL, 0,&bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = {HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) iParam; 
switch (lpDrawItem->CtlID) 

{ 

case  102: 

if  ( IpD  r aw 1 1 em- >i t emAc t i on==ODA_DRAWENT I RE ) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem, "CHARTl") ; 
return  TRUE; 
break; 
case  104: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawIcon (IpDrawItem,  "CHARTS") ; 
return  TRUE; 
break; 
case  105: 

if  (IpDrawIt  em-  >i t emAc t i on==OD A_D RAWENT I RE ) 
i f ( IpD  r a w 1 1 em->Ct 1 Type==ODT_BUTTON ) 

BLDDrawIcon (IpDrawItem, "CHART4") ; 
return  TRUE; 
break; 
case  106: 

i f ( IpD  r aw 1 1 em->i t emAc t i on==ODA_D  RAWENT IRE ) 
i f ( IpD  r a w 1 1 em- >Ct 1 Type==OD T_BUTTON ) 

BLDDrawIcon (IpDrawItem, "CHARTS") ; 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 


} 

break; 
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default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  REPORT 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_ReportDlgFuncDef (HWND  hWnd,char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_ReportDlgProc,  hinst ) ; 
ReturnValue  = DialogBox (hlnst, (LPSTR) (szDlgName?S2DlgName: "REPORT") ^ 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "REPORT") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  -Default  dialog  box  procedure 

BOOL  BLD_ReportDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IPafam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, &bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush (GetDlgItem(hDlg, 109) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgItem(hDlg, 115)  , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgItem(hDlg, 118) , RGB (192, 192, 192) ) ; 
break; 

case  WM_COMMAND : 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam)  ; 

hCtrl  = (HWND) (UINT) lParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam) ; 

#else 

notification  = HIWORD (IParam)  ; 


#endif 


if (! hCtrl) 


/ / Menu  input  or  CR 
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{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  1 : 

switch (notification) 

{ 

case  BN_CLICKED: 

BIiD_ReportStatisticsDlgFunc  (hDlg, message,  wParam,  IParam) 
EndDialog (hDlg, 1 ) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
if (BLDDrawItem(hDlg, IpDrawItem) ) 
retutn  TRUE; 

} 

break; 

break; 

case  WM_DESTROY: 

BLDExitBrush (GetDlgltem (hDlg,  109) ) ; 

BLDExitBrush (GetDlgltem (hDlg,  115)  ) ; 

BLDExitBrush (GetDlgItem(hDlg, 118) ) ; 
break; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX: 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN: 
case  WM_CTLCOLORDLG: 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 
{ 

HWND  hCtrl; 

#ifdef  WIN32 

hCtrl  = (HWND) IParam; 

#else 

hCtrl  = (HWND)  LOWORD  (IParam)  ; 

switch (GetDlgCtrllD (hCtrl) ) 

{ 

case  109: 


#endif 
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SetTextColor ( (HDC) wParam, RGB (0,0,128) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  115: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  118: 

SetTextColor  ( (HDC) wParam, RGB (0, 0, 128 ) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


II  *************************************************************** 

//  Modal  Dialog  Box:  NEWBROWSE 

II  *************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_BrowseEntryDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_BrowseEntryDlgProc,  hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (szDlgName?szDlgName: "NEWBROWSE") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue“=-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "NEWBROWSE") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


/ / Default  dialog  box  procedure 

BOOL  BLD_BrowseEntryDlgDef ault (HWND  hDlg,UINT  message, WPARAM  wParam, LP ARAM  IParam) 

{ 

BOOL  bRet ; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, &bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush (GetDlgltem (hDlg, 109)  , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 115)  , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 118) , RGB (192, 192, 192) ) ; 
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BLDInitSolidBrush  (GetDlgltem (hDlg,  121)  , RGB  (192, 192, 192)  ) ; 
break; 

case  WM_COMMAND: 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam) ; 

hCtrl  = (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam) ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  1: 

switch (notification) 

{ 

case  BN_CLICKED: 

BLD_BrowseReportDlgFunc (hDlg, message, wParam, IParam) 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
if (BLDDrawItem(hDlg, IpDrawItem) ) 
return  TRUE; 

} 

break; 

break; 

case  WM_DESTROy: 

BLDExitBrush (GetDlgltem (hDlg,  109)  ) ; 

BLDExitBrush (GetDlgltem (hDlg, 115)  ) ; 

BLDExitBrush (GetDlgItem(hDlg, 118) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 121)  ) ; 
break; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX : 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM  CTLCOLORBTN: 
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case  WM_CTLCOLORDLG : 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 

{ 

HWND  hCtrl; 

#ifdef  WIN32 

hCtrl  = (HWND) IParam; 

#else 

hCtrl  = (HWND) LOWORD (IParam) ; 

#endif 

switch (GetDlgCtrllD (hCtrl)  ) 

{ 

case  109: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  115: 

SetTextColor ( (HDC) wParam, RGB (0, 0, 128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT)  ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  118: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 

■return  (BOOL) BLDCtlColorPropBrush (hCtrl)  ; 
break; 
case  121: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)); 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 


j j *************************************************************** 

//  Modal  Dialog  Box:  TOTALS 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_ReportTotalsDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_ReportTotalsDlgProc,  hinst ) 
ReturnValue  = DialogBox (hinst , (LPSTR)  (szDlgName?szDlgName: "TOTALS")  , 

hWnd, IpProc) ; 

FreeProcInstance( (FARPROC) IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "TOTALS") 
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MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_ReportTotalsDlgDefault (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0, &bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush (GetDlgItem(hDlg, 109) , RGB (0, 0, 128) ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 110) ,RGB (0, 0,128)); 

BLDInitSolidBrush (GetDlgItem(hDlg, 111) , RGB (0, 0, 128) ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 112) ,RGB (0, 0,128) ) ; 

BLDInitSolidBrush (GetDlgItem(hDlg, 113) , RGB (0, 0, 128) ) ; 
break; 

case  WM_COMMAND : 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam) ; 

hCtrl  = (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam) ; 

#else 

notification  = HIWORD (IParam) ; 

#endif 

if (! hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam,  IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  IDPRINTTOT: 

switch (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg, IDPRINTTOT) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 

case  ID_CONT: 

switch (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg, ID_CONT)  ; 
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return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IPa ram; 
if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 

} 

break; 

break; 

case  WM_DESTROy: 

BLDExitBrush (GetDlgltem (hDlg,  109) ) ; 
BLDExitBrush (GetDlgltem (hDlg,  110 ) ) ; 
BLDExitBrush (GetDlgItem{hDlg,  111)  ) ; 
BLDExitBrush (GetDlgltem (hDlg, 112) ) ; 
BLDExitBrush (GetDlgItem(hDlg,  113)  ) ; 
break; 

#ifdef  WIN32  • 

case  WM_CTLCOLORMSGBOX: 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN : 
case  WM_CTLCOLORDLG: 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

/ / Extracting  data  from  message 

{ 

HWND  hCtrl; 

#ifdef  WIN32 

hCtrl  = (HWND) IParam; 

#else 

hCtrl  = (HWND) LOWORD (IParam) ; 

#endif 

switch (GetDlgCtrllD (hCtrl)  ) 

{ 

case  ID_TotEIN: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)); 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 
case  101: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)); 
SetBkMode ( (HDC) wParam, OPAQUE) ; 
return  (BOOL) BLDCtlColorDef aultBrush (hCtrl) 
break; 

case  ID_TotRpt : 
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SetTextColor  ( (HDC)  wParam,  RGB  (0, 0, 0)  ) ; 

SetBkMode ( (HDC) wP a ram, OPAQUE) ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl) ; 
break; 
case  107: 

SetTextColor ( (HDC) wParam, RGB (0,0, 128) ) ; 

SetBkMode  ( (HDC) wP a ram,  OPAQUE) ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl) ; 
break; 
case  108: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wP a ram, OPAQUE) ; 
return  (BOOL) BLDCtlColorDefaultBrush (hCtrl)  ; 
break; 
case  109: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  110: 

SetBlcMode  ( (HDC)  wParam,  TRANSPARENT)  ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  111: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  112: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl)  ; 
break; 
case  113: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl)  ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


II  *************************************************************** 

//  Modal  Dialog  Box:  SEQ 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_SequenceDlgFuncDef (HWND  hWnd, char  *S2DlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_SequenceDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst , (LPSTR) (s2DlgName?szDlgName: "SEQ") , 

hWnd, IpProc)  ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (s2DlgName?S2DlgName : "SEQ") , 
MB_OK  i MB_ICONHAND) ; 

return  ReturnValue; 

} 
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//  Default  dialog  box  procedure 

BOOL  BLD_SequenceDlgDefault (HWND  hDlg^UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg,  message, wParam, IParam, BLDDLGMODAL, 0, &bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush (hDlg, RGB (192, 192, 192)  ) ; 

BLDInitSolidBrush (GetDlgItem(hDlg, 103) ,RGB (192,192,192)  ) ; 
break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

//  Extracting  data  from  message 
hCtrl  = (HWND)(UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 

} 

break; 

break; 

case  WM_DESTROY: 

BLDExitBrush (hDlg) ; 

BLDExitBrush (GetDlgltem (hDlg,  103)  ) ; 
break; 

#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX: 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN: 
case  WM_CTLCOLORDLG: 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 

{ 
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HWND 

tifdef  WIN32 
hCtrl 

#else 

hCtrl 

#endif 

#ifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg,  (HDC) wParam)  ; 

#else 

if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC) wParam) ; 

#endif 

switch (GetDlgCtrllD (hCtrl)  ) 

{ 

case  103: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 

} 
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hCtrl; 

= (HWND)  IParam; 

= (HWND)  LOWORD  (IParam)  ; 


II  *************************************************************** 

//  Modal  Dialog  Box:  QPARAM 

II  *************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_qparamDlgFuncDef (HWND  hWnd, char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_qparamDlgProc, hinst ) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName : "QPARAM" ) / 

hWnd, IpProc)  ; 

FreeProcInstance ( (FARPROC) IpProc)  ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_Cannot Create, (szDlgName?szDlgName : "QPARAM") , 
MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_qparamDlgDefault (HWND  hDlg,UINT  message, WPARAM  wParam, LP ARAM  IParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0,&bRet) ) 
return  bRet; 

switch (message) 

{ 
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case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrushChDlg, RGB (0,128, 128)  ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 109) ,RGB (0, 128, 128) ) ; 
BLDInitCtrlFont (hDlg, 109,-16,0,0,0,700,0,0,0,0,3,2,1,34, "Arial") ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 115) , RGB ( 0 , 128 , 128 ) ) ; 
BLDInitCtrlFont (hDlg, 115,-16,0,0,0,700,0,0,0,0,3,2,1,34, "Arial" ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 119) , RGB (0, 128, 128) ) ; 
BLDInitCtrlFont (hDlg, 119,-16,0,0,0,700,0,0,0,0,3,2,1,34, "Arial " ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 116) , RGB (0, 128, 128) ) ; 
BLDInitCtrlFont (hDlg, 116, -16, 0, 0, 0,700, 0,0, 0,0, 3, 2, 1,34, "Arial") ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 121) , RGB (0, 128, 128)  ) ; 
BLDInitCtrlFont (hDlg, 121,-16,0,0,0,700,0,0,0,0,3,2,1,34, "Arial") ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 117) , RGB (0, 128, 128) ) ; 
BLDInitCtrlFont (hDlg, 117,-16,0,0, 0,700,0,0,0,0,3,2,1,34, "Arial") ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 124) , RGB ( 0 , 128 , 128 ) ) ; 
BLDInitCtrlFont (hDlg, 124,-19,  0,0, 0,700,0,0,0,0,3,2,1,34,  "Arial")  ; 
BLDInitSolidBrush (GetDlgltem (hDlg, qp_year) , RGB (0, 128, 128 ) ) ; 
BLDInitCtrlFont (hDlg, qp_year, -16,0,0,0,700,0,0,0,0,3,2,1,34, "Arial" ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, qp_ein) ,RGB (0, 128, 128) ) ; 
BLDInitCtrlFont (hDlg, qp_ein, -16, 0,0,0, 700, 0, 0, 0, 0, 3, 2, 1, 34, "Arial") ; 
BLDInitSolidBrush (GetDlgltem (hDlg, qp_estab) , RGB (0,128,128) ) ; 
BLDInitCtrlFont (hDlg, qp_estab, -16,  0, 0, 0, 700, 0, 0, 0,  0, 3,2,  1, 34,  "Arial") 
BLDInitSolidBrush (GetDlgltem (hDlg, qp_lname) , RGB (0,128,128) ) ; 
BLDInitCtrlFont (hDlg, qp_lname, -16,0,0,0,700,0,0,0,0,3,2,1,34,  "Arial") 
BLDInitSolidBrush (GetDlgltem (hDlg, qp_fname) , RGB (0,128,128) ) ; 
BLDInitCtrlFont (hDlg, qp_fname, -16,0,0,0,700,0,0,0,0,3,2,1,34, "Arial") 
BLDInitSolidBrush (GetDlgltem (hDlg,  qp_ssn) , RGB (0,128,128)  ) ; 
BLDInitCtrlFont (hDlg, qp_ssn, -16, 0,0,0, 700, 0, 0, 0, 0, 3, 2, 1, 34^ "Arial") ; 
break; 

case  WM_COMMAND: 

{ 

HWND  hCtrl; 

/ / Extracting  data  from  message 
hCtrl  = (HWND) (UINT)lParam; 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wParam, IParam) ) 
return  TRUE; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpD r awl tern; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 

} 

break; 

break; 

case  WM_DESTROY: 

BLDExitBrush (hDlg) ; 

BLDExitCtrlFont (hDlg, 109) ; 

BLDExitBrush (GetDlgltem (hDlg, 109)  ) ; 

BLDExitCtrlFont (hDlg, 115) ; 

BLDExitBrush (GetDlgltem (hDlg,  115)  ) ; 

BLDExitCtrlFont (hDlg, 119)  ; 
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BLDExitBrush (GetDlgltem (hDlg,  119)  ) ; 
BLDExitCtrlFont (hDlg,  116)  ; 

BLDExitBrush (GetDlgltem (hDlg,  116)  ) ; 
BLDExitCtrlFont (hDlg,  121)  ; 

BLDExitBrush {GetDlgItem(hDlg,  121)  ) ; 
BLDExitCtrlFont (hDlg, 117)  ; 

BLDExitBrush (GetDlgItem(hDlg,  117)  ) ; 
BLDExitCtrlFont (hDlg, 124)  ; 

BLDExitBrush (GetDlgIt€m(hDlg, 124) ) ; 
BLDExitCtrlFont (hDlg, qp_year) ; 
BLDExitBrush  (GetDlgl tern  (hDlg,  qp__year)  ) ; 
BLDExitCtrlFont (hDlg, qp_ein) ; 
BLDExitBrush (GetDlgItem(hDlg, qp_ein) ) ; 
BLDExitCtrlFont (hDlg, qp_estab) ; 
BLDExitBrush (GetDlgltem (hDlg, qp_estab) ) 
BLDExitCtrlFont (hDlg, qp_lname) ; 
BLDExitBrush  (GetDlgltem  (hDlg,  C53_lname)  ) 
BLDExitCtrlFont  (hDlg,  qp_fname)  ; 
BLDExitBrush (GetDlgltem (hDlg, qp_fname) ) 
BLDExitCtrlFont (hDlg, qp_ssn)  ; 
BLDExitBrush (GetDlgItem(hDlg, qp_ssn) ) ; 
break; 


#ifdef  WIN32 

case  WM_CTLCOLORMSGBOX: 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN: 
case  WM_CTLCOLORDLG : 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 
#else 

case  WM_CTLCOLOR: 

#endif 


//  Extracting  data  from  message 

{ 


HWND 


hCtrl; 


= (HWND) iParam; 

= (HWND) LOWORD (IParam)  ; 


#ifdef  WIN32 
hCtrl 

#else 

hCtrl 

#endif 

#ifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC)wParam) 


#else 


#endif 


if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC)wParam) 

switch (GetDlgCtrllD (hCtrl) ) 

{ 

case  109: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)); 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  115: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)); 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  119: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)  ) ; 
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SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  116: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)); 

SetBkMode ( (HDC) wP a ram, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  121: 

SetTextColor ( (HDC) wParam,  RGB (0,0,0)); 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  117: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)); 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl)  ; 
break; 
case  124: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

case  qp__year: 

SetTextColor ( (HDC) wParam, RGB (255, 255, 255) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl)  ; 
break; 

case  qp_ein: 

SetTextColor ( (HDC) wParam, RGB (255, 255, 255)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

case  qp_estab: 

SetTextColor ( (HDC) wParam, RGB (255, 255, 255)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

case  qp_lname : 

SetTextColor ( (HDC) wParam, RGB (255, 255, 255)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

case  qp_fname: 

SetTextColor ( (HDC) wParam, RGB (255, 255,255) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

case  qp_ssn: 

SetTextColor ( (HDC) wParam, RGB (255,255, 255) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl ) ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 


II  *************************************************************** 
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//  Modal  Dialog  Box:  QUESTION 

11  *************************************** ************************ 

//  Startup  procedure  for  modal  dialog  box 

int  BIiD_questDlgFuncDef  (HWND  hWnd,  char  *szDlgName) 

{ 

DLGPROC  IpProc; 

int  ReturnValue; 

IpProc  = (DLGPROC) MakeProcInstance ( (FARPROC) BLD_questDlgProc, hinst) ; 
ReturnValue  = DialogBox (hinst, (LPSTR) (szDlgName?szDlgName: "QUESTION") , 

hWnd, IpProc) ; 

FreeProcInstance ( (FARPROC) IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, (szDlgName?szDlgName : "QUESTION") , 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


//  Default  dialog  box  procedure 

BOOL  BLD_questDlgDefault (HWND  hDlg.UINT  message, WP ARAM  wParam,  LPARAM  IParam) 

{ 

BOOL  bRet; 

bRet  = FALSE;  //  Default  return  value  if  not  processed 

if (BLDDlgMsgFilter (hDlg, message, wParam, IParam, BLDDLGMODAL, 0,&bRet) ) 
return  bRet; 

switch (message) 

{ 

case  WM_INITDIALOG: 

bRet  = TRUE;  //  Default  return  for  WM_INITDIALOG  is  TRUE 

BLDInitSolidBrush(hDlg,RGB(192,192,192)  ) ; 

BLDInitSolidBrush (GetDlgltem (hDlg, 101) , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush(GetDlgItem(hDlg, 102) , RGB (192, 192, 192) ) ; 
BLDInitCtrlFont (hDlg,  102, -19,  0,  0,0, 700, 0,0, 0,0, 3, 2,1,  34,  "Arial") ; 
BLDInitSolidBrush (GetDlgItem(hDlg, 103) , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 104) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, ID_QlYes) ,RGB (192,192,192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, ID_QlNo) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, ID_Q2Yes) ,RGB (192,192,192)); 
BLDInitSolidBrush (GetDlgltem (hDlg, ID_Q2No) , RGB (192, 192, 192)  ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 111) , RGB (192, 192, 192)  ) ; 
BLDInitCtrlFont (hDlg, 111,-11,0,0,0,700,0,0,0,0,3,2,1,34, "Arial") ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 113) , RGB (192, 192, 192)  ) ; 
BLDInitCtrlFont (hDlg, 113,-11,0,0,0,700,0,0,0,0,3,2,1,34, "Arial") ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 114) , RGB (192, 192, 192) ) ; 
BLDInitSolidBrush (GetDlgltem (hDlg, 115) , RGB (192, 192, 192)  ) ; 
break; 

case  WM_COMMAND : 

{ 

WORD  wid; 

WORD  notification; 

HWND  hCtrl; 

//  Extracting  data  from  message 
wId  = LOWORD (wParam) ; 

hCtrl  = (HWND) (UINT) IParam; 

#ifdef  WIN32 

notification  = HIWORD (wParam) ; 
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#else 

notification  = HIWORD (iParam) ; 

#endif 

if(!hCtrl)  //  Menu  input  or  CR 

{ 

if  (BLDMenuCommand (hDlg, message, wP a ram, IParam) ) 
return  TRUE; 

} 

switch (wid) 

{ 

case  1 : 

switch (notification) 

{ 

case  BN_CLICKED: 

EndDialog (hDlg,  1 ) ; 
return  TRUE; 
break; 
default : 
break; 

} 

break; 
default : 
break; 

} 

} 

break; 

case  WM_DRAWITEM: 

{ 

LPDRAWITEMSTRUCT  IpDrawItem; 

IpDrawItem  = (LPDRAWITEMSTRUCT) IParam; 
switch (lpDrawItem->CtlID) 

{ 

case  100: 

if  (lpDrawItem->itemAction==ODA_DRAWENTIRE) 
if  (lpDrawItem->CtlType==ODT_BUTTON) 

BLDDrawBitmap (IpDrawItem, "ENTERPRZ" , TRUE) 
return  TRUE; 
break; 
default : 

if (BLDDrawItem (hDlg, IpDrawItem) ) 
return  TRUE; 
break; 

} 

} 

break; 

case  WM_DESTROY: 

BLDExitBrush (hDlg) ; 

BLDExitBrush (GetDlgltem (hDlg, 101) ) ; 

BLDExitCtrlFont (hDlg, 102) ; 

BLDExitBrush (GetDlgltem (hDlg, 102) ) ; 

BLDExitBrush (GetDlgItem(hDlg, 103) ) ; 

BLDExitBrush (GetDlgltem (hDlg,  104)  ) ; 

BLDExitBrush (GetDlgltem (hDlg, ID_QlYes)  ) ; 

BLDExitBrush (GetDlgltem (hDlg, ID_QlNo) ) ; 

BLDExitBrush (GetDlgltem (hDlg, ID_Q2Yes) ) ; 

BLDExitBrush (GetDlgltem (hDlg, ID_Q2No) ) ; 

BLDExitCtrlFont (hDlg, 111); 

BLDExitBrush (GetDlgltem (hDlg, 111)  ) ; 

BLDExitCtrlFont (hDlg, 113)  ; 

BLDExitBrush (GetDlgItem(hDlg, 113) ) ; 

BLDExitBrush (GetDlgltem (hDlg, 114 ) ) ; 
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BLDExitBrush (GetDlgltem (hDlg,  115)  ) ; 
break; 

tifdef  WIN32 

case  WM_CTLCOLORMSGBOX : 
case  WM_CTLCOLOREDIT: 
case  WM_CTLCOLORLISTBOX: 
case  WM_CTLCOLORBTN: 
case  WM_CTLCOLORDLG: 
case  WM_CTLCOLORSCROLLBAR: 
case  WM_CTLCOLORSTATIC: 

#else 

case  WM_CTLCOLOR: 

#endif 

//  Extracting  data  from  message 

{ 

HWND  hCtrl; 

tifdef  WIN32 

hCtrl  = (HWND) iParam; 

telse 

hCtrl  = (HWND) LOWORD (IParam) ; 

tendif 

tifdef  WIN32 

if (message  ==  WM_CTLCOLORDLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC)wParam) 

telse 

if (HIWORD (IParam)  ==  CTLCOLOR_DLG) 

return  (BOOL) BLDCtlColorBrushSetOrg (hDlg, (HDC)wParam) 

tendif 

switch (GetDlgCtrllD (hCtrl) ) 

{ 

case  101: 

SetTextColor ( (HDC) wParam, RGB (0,0, 255)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  102: 

SetTextColor ( (HDC) wParam, RGB (0,0,128)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  103: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  104: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

case  ID_QlYes : 

SetBkMode  ( (HDC)  wParam,  TRANSPARENT)  ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

case  ID_QlNo : 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

case  ID_Q2Yes: 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 

case  ID_Q2No: 

SetBkMode  ( (HDC)  wParam,  TRANSPARENT)  ; 
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return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  111: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  113: 

SetTextColor ( (HDC) wParam, RGB (0,0,0)  ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl) ; 
break; 
case  114: 

SetBkMode  ( (HDC)  wParam,  TR?VNSPARENT)  ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl ) ; 
break; 
case  115: 

SetTextColor ( (HDC) wParam, RGB (192, 192, 192) ) ; 

SetBkMode ( (HDC) wParam, TRANSPARENT) ; 
return  (BOOL) BLDCtlColorPropBrush (hCtrl ) ; 
break; 

} 

} 

break; 

default : 
break; 

} 

return  bRet;  //  No  explicit  return  - return  default 
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//astat . c 

//created  12/3/93  by  Laura  Downey,  Computer  Scientist,  NIST 
//utility  program  to  convert  binary  stats  found  in  file  stat*.fil 
//to  ascii  format  and  to  write  the  stats  to  stat*.txt 
//compiled  using  MSC6 . 0 pwb 

//NOTE:  astat.exe  needs  to  be  located  in  the  same  directory  as  stat#.fil 


tinclude  <stdio.h> 
tinclude  <conio.h> 
tinclude  <time . h> 
#include  "struct.h" 


//standard  i/o 

//console  and  port  i/o 

/ /time  definitions  and  structures 

//custom  structure  definitions  including  ex_stat 


struct  ex_stat  aggregate;  //initializes  to  all  zeroes  when  defined  globally 


main ( ) 

{ 

char  c_usernum[3] ; 
char  ASTATFILE [15] ; 
char  STATFILE [15] ; 
char  UFILE[15]; 


//converted  user  number 
//text  file  of  statistics 
//holds  file  name  entered  by  user 
//holds  file  name  of  user  number  file 


FILE  *asf,  *sf,  *uf; 


//file  pointer  to  pstat  file,  stat  file 
//&  usernxim  file 


int  num; 
int  user; 
time  t t; 


//was  anything  read  from  the  file 
//user  number  read  from  usernum.  f il 
//current  date  and  time 


//get  the  current  time  and  ask  user  for  name  of  stat  file 
t = time (NULL) ; 
system ("els")  ; 

printf ("PLEASE  ENTER  THE  NAME  OF  THE  BINARY  FILE  CONTAINING  THE  STATISTICS \n\n" ) 
scanf("%s",  STATFILE); 

//read  in  the  latest  aggregate  statistics  from  stat#.fil 
sf  = f open (STATFILE,  "rb") ; 
if  (sf  ==  NULL) 

{ 

printf ("UNABLE  TO  OPEN  %s,  PROGRAM  EXITING",  STATFILE); 
exit  (0)  ; 

} 

else  //sf  !=  NULL 
{ 

num  = f read (& aggregate,  sizeof  (struct  ex_stat) , 1,  sf ) ; 
if  (num  ==  0) 

{ 

printf  ("%s  IS  EMPTY,  PROGRAM  EXITING",  STATFILE); 
f close (sf ) ; 
exit  ( 0 ) ; 

} 

else  //get  the  user  number 

{ 

f close (sf ) ; 

strepy (UFILE,  "usernum, fil" ) ; 
uf  = fopen(UFILE,  "rt") ; 
if  (uf  ==  NULL) 

{ 

printf ("UNABLE  TO  OPEN  %s\n,  PROGRAM  EXITING",  UFILE); 
exit  ( 0 ) ; 

} 

else  //uf  !=  NULL 
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{ 

num  = fscanf(uf, 
if  (num  ==  0) 

{ 

"%d",  &user) ; 

print f ("USERNUM.FIL  WAS  EMPTY,  PROGRAM  EXITING"); 
f close (uf ) ; 
exit ( 0 ) ; 

} 

else  //display  and  write  stats  to  text  file 

{ 

fclose (uf ) ; 

strcpy (ASTATFILE,  "stat") ; 

strcat (ASTATFILE,  itoa(user,  c_usernum,  10)  ); 

strcat (ASTATFILE,  ".txt") ; 

asf  = fopen (ASTATFILE,  "wt") ; 
if  (asf  ==  NULL) 

{ 

print f ("UNABLE  TO  OPEN  %s,  PROGRAM  EXITING",  ASTATFILE) ; 
exit  ( 0 ) ; 

} 

else  / /display  and  write 

{ 

system ("els") ; 


fprintf (asf. 

"Today's  date  and  time:  %s\n\n",  ctime(&t)); 

fprintf (asf. 

"\nTOTALS  USED  FOR  CALCULATING  AVERAGES  AND  PERCENTAGES \n\n" ) ; 

fprintf (asf, 

ime)  ; 

"RUNNING  TOTAL  OF  BROWSE  REPORT  TIME  = %.2f\n",  aggregate . br_tot_t 

fprintf (asf, 

ot_time)  ; 

"RUNNING  TOTAL  OF  SQ  TIME,  RES.  W/NO  INT  = %.2f\n",  aggregate . rs_t 

fprintf (asf, 

_tot_time) ; 

"RUNNING  TOTAL  OF  SQ  TIME,  UNRES . W/NO  INT  = %.2f\n",  aggregate. us 

fprintf (asf, 

t_time) ; 

"RUNNING  TOTAL  OF  SQ  TIME,  RES.  W/  INT  = %.2f\n",  aggregate . rsi_to 

fprintf (asf, 

ot_time)  ; 

"RUNNING  TOTAL  OF  SQ  TIME,  UNRES.  W/INT  = %.2f\n",  aggregate . usi_t 

fprintf (asf, 
te . rq_tot_time)  ; 

"RUNNING  TOTAL  OF  SQ  BROWSE  TIME,  RES.  W/NO  INT  = %.2f\n",  aggrega 

fprintf (asf, 
gate . uq_tot_time)  ; 

"RUNNING  TOTAL  OF  SQ  BROWSE  TIME,  UNRES.  W/NO  INT  = %.2f\n",  aggre 

fprintf (asf, 

. r qi_t  o t_t  ime ) ; 

"RUNNING  TOTAL  OF  SQ  BROWSE  TIME,  RES.  W/  INT  = %.2f\n",  aggregate 

fprintf (asf, 
e . uqi_tot_time)  ; 

"RUNNING  TOTAL  OF  SQ  BROWSE  TIME,  UNRES.  W/INT  = %.2f\n",  aggregat 

fprintf (asf. 

"TOTAL  BROWSE  CASES  = %ld\n" , aggregate . tot_browse) ; 

fprintf (asf, 
on_interrupt ) ; 

"TOTAL  RESOLVED  CASES  w/NO  INTERRUPTIONS  = %ld\n" , aggregate . rtot_n 

fprintf (asf, 
_non_interrupt ) ; 

"TOTAL  UNRESOLVED  CASES  w/NO  INTERRUPTIONS  = %ld\n" , aggregate . utot 

fprintf (asf , "TOTAL  NON- INTERRUPTED  CASES  = %ld\n" , aggregate . tot  non  interrupt); 
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fprintf (asf, "TOTAL  RESOLVED  CASE  w/ INTERRUPTIONS  = %ld\n" , aggregate . rtot_interr 

upt ) ; 

fprintf (asf, "TOTAL  UNRESOLVED  CASE  w/ INTERRUPTIONS  = %ld\n" , aggregate . utot_inte 

rrupt) ; 

fprintf (asf, "TOTAL  INTERRUPTED  CASES  = %ld\n" , aggregate . tot_interrupt ) ; 


fprintf (asf. 

"TOTAL  SINGLE  QUERY  CASES  = %ld\n",  aggregate . tot_cases ) ; 

fprintf (asf. 

"TOTAL  NON-SQ  CASES  = %ld\n",  aggregate . tot_non_cases ) ; 

fprintf (asf. 

"TOTAL  RESOLVED  CASES  = %ld\n",  aggregate . tot_resolved) ; 

fprintf (asf. 

"TOTAL  UNRESOLVED  CASES  = %ld\n",  aggregate . tot_unresolved) ; 

fprintf (asf. 

"TOTAL  OUTLIERS  = %ld\n",  aggregate . tot_outliers ) ; 

fprintf (asf. 

"TOTAL  ADD  RECORDS  = %ld\n",  aggregate . tot_add_records ) ; 

fprintf (asf. 

"TOTAL  RES.  ADD  MATCHES  = %ld\n",  aggregate . rtot_add_match) ; 

fprintf (asf. 

"TOTAL  UNRES.  ADD  MATCHES  = %ld\n",  aggregate . utot_add_match)  ; 

fprintf (asf. 

"TOTAL  ADD  MATCHES  = %ld\n",  aggregate . tot_add_matches ) ; 

fprintf (asf, 
tot_add_matchO)  ; 

"RUNNING  TOTAL  OF  RES.  CASES  W/0  ADD  MATCHES  = %ld\n",  aggregate . r 

fprintf (asf, 
tot_add_matchl)  ; 

"RUNNING  TOTAL  OF  RES.  CASES  W/1  ADD  MATCHES  = %ld\n",  aggregate. r 

fprintf (asf, 
tot_add_match2)  ; 

"RUNNING  TOTAL  OF  RES.  CASES  W/2  ADD  MATCHES  = %ld\n",  aggregate. r 

fprintf (asf, 
tot_add_match3)  ; 

"RUNNING  TOTAL  OF  RES.  CASES  W/3  ADD  MATCHES  = %ld\n",  aggregate. r 

fprintf (asf, 
rtot_add_match4_plus)  ; 

"RUNNING  TOTAL  OF  RES.  CASES  W/4+  ADD  MATCHES  = %ld\n",  aggregate. 

fprintf (asf, 

. utot_add_matchO ) ; 

"RUNNING  TOTAL  OF  UNRES.  CASES  W/0  ADD  MATCHES  = %ld\n",  aggregate 

fprintf (asf, 

. utot_add_matchl ) ; 

"RUNNING  TOTAL  OF  UNRES.  CASES  W/1  ADD  MATCHES  = %ld\n",  aggregate 

fprintf (asf, 
.utot_add_match2) ; 

"RUNNING  TOTAL  OF  UNRES.  CASES  W/2  ADD  MATCHES  = %ld\n",  aggregate 

fprintf (asf, 

. utot_add_match3)  ; 

■"RUNNING  TOTAL  OF  UNRES.  CASES  W/3  ADD  MATCHES  = %ld\n",  aggregate 

fprintf (asf, 
e . utot_add_match4_plus)  , 

"RUNNING  TOTAL  OF  UNRES.  CASES  W/4+  ADD  MATCHES  = %ld\n",  aggregat 

fprintf(asf,  "\nAVERAGES  AND  PERCENTAGES\n\n") ; 

fprintf (asf,  "RUNNING  AVG  OF  BROWSE  REPORT  TIME  = %.2f\n",  aggregate . avg_br_tim 

e)  ; 

fprintf (asf,  "RUNNING  AVG  OF  SQ  TIME,  RES.  W/NO  INT  = %.2f\n",  aggregate . rs_avg 

time)  ; 
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fprintf (asf , 

vg_time) ; 

"RUNNING  AVG  OF  SQ  TIME,  UNRES . W/NO  INT  = %.2f\n",  aggregate . us_a 

fprintf (asf , 

time)  ; 

"RUNNING  AVG  OF  SQ  TIME,  RES.  W/  INT  = %.2f\n",  aggregate . rsi_avg_ 

fprintf (asf , 

_time)  ; 

"RUNNING  AVG  OF  SQ  TIME,  UNRES.  W/INT  = %.2f\n",  aggregate . usi_avg 

fprintf (asf , 

. rc[;_avg_time)  ; 

"RUNNING  AVG  OF  SQ  BROWSE  TIME,  RES.  W/NO  INT  = %.2f\n",  aggregate 

fprintf (asf , 
te . uq_avg_time)  ; 

"RUNNING  AVG  OF  SQ  BROWSE  TIME,  UNRES.  W/NO  INT  = %.2f\n",  aggrega 

fprintf (asf , 
qi_avg_time)  ; 

"RUNNING  AVG  OF  SQ  BROWSE  TIME,  RES.  W/  INT  = %.2f\n",  aggregate. r 

fprintf (asf , 
uqi_tot_time)  ; 

"RUNNING  AVG  OF  SQ  BROWSE  TIME,  UNRES.  W/INT  = %.2f\n",  aggregate. 

fprintf (asf , 
gate . avg_add_record)  ; 

"RUNNING  AVG  ADD  RECORDS  PER  BROWSE  REP.  SELECTION=  %.2f\n",  aggre 

fprintf (asf , 

d_match) ; 

"RUNNING  AVG  ADD  MATCHES  PER  RES.  CASE=  %.2f\n",  aggregate . ravg_ad 

fprintf (asf , 

add_match) ; 

"RUNNING  AVG  ADD  MATCHES  PER  UNRES.  CASE=  %.2f\n",  aggregate . uavg_ 

fprintf {asf, 

h)  ; 

"RUNNING  AVG  ADD  MATCHES  PER  CASE=  %.2f\n",  aggregate . avg_add_matc 

fprintf (asf, 
r_add_matchO) ; 

"PERCENTAGE  OF  RES.  CASES  W/0  ADD  MATCHES  = %.2f\n",  aggregate . rpe 

fprintf (asf, 
r_add_matchl ) ; 

"PERCENTAGE  OF  RES.  CASES  W/1  ADD  MATCHES  = %.2f\n",  aggregate . rpe 

fprintf (asf, 
r_add_match2) ; 

"PERCENTAGE  OF  RES.  CASES  W/2  ADD  MATCHES  = %.2f\n",  aggregate . rpe 

fprintf (asf, 
r_add_match3) ; 

"PERCENTAGE  OF  RES.  CASES  W/3  ADD  MATCHES  = %.2f\n",  aggregate . rpe 

fprintf (asf, 
er_add_match4_plus) ; 

"PERCENTAGE  OF  RES.  CASES  W/4+  ADD  MATCHES  = %.2f\n",  aggregate . rp 

fprintf (asf, 
per_add_matchO ) ; 

"PERCENTAGE  OF  UNRES.  CASES  W/0  ADD  MATCHES  = %.2f\n",  aggregate . u 

fprintf (asf, 
per_add_matchl ) ; 

"PERCENTAGE  OF  UNRES.  CASES  W/1  ADD  MATCHES  = %.2f\n",  aggregate. u 

fprintf (asf, 
per_add_match2 ) ; 

"PERCENTAGE  OF  UNRES.  CASES  W/2  ADD  MATCHES  = %.2f\n",  aggregate. u 

fprintf (asf, 
per_add_match3 ) ; 

"PERCENTAGE  OF  UNRES.  CASES  W/3  ADD  MATCHES  = %.2f\n",  aggregate. u 

fprintf (asf, 
uper_add_match4_plus)  ; 

"PERCENTAGE  OF  UNRES.  CASES  W/4+  ADD  MATCHES  = %.2f\n",  aggregate. 
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fprintf(asf,  "NnUI  USAGE  TOTALS  PER  SELECTED  OPERATION\n\n" ) ; 

fprintf  (asf , "TOTAL  SINGLE  QUERY  SELECTIONS  = %ld\n",  aggregate . tot_single_quer 

fprintf(asf,  "TOTAL  BROWSE  REPORT  SELECTIONS  = %ld\n",  aggregate . tot_browse_rep 

fprintf (asf , "TOTAL  PRINT  REPORT  SELECTIONS  = %ld\n",  aggregate . tot_print_repor 

fprintf(asf,  "TOTAL  BLANKET  REPORT  SELECTIONS  = %ld\n",  aggregate . tot_blanket)  ; 
fprintf(asf,  "TOTAL  DIFFERENT  REPORT  = %ld\n",  aggregate . tot_diff_report ) ; 
fprintf (asf , "TOTAL  QP  = %ld\n",  aggregate . tot_qp) ; 

fprintf (asf / "TOTAL  EMPLOYER  DETAIL  = %ld\n",  aggregate . tot_er_detail ) ; 
fprintf(asf,  "TOTAL  EMPLOYEE  DETAIL  = %ld\n",  aggregate . tot_ee_detail) ; 
fprintf (asf,  "TOTAL  FINAL  TOTALS  = %ld\n",  aggregate . tot_final ) ; 

fprintf (asf,  "TOTAL  PRINT  EMPLOYER  DETAIL  SELECTIONS=  %ld\n",  aggregate . tot_pr_ 

fprintf (asf,  "TOTAL  PRINT  EMPLOYEE  DETAIL  SELECTIONS=  %ld\n",  aggregate . tot_pr_ 

fprintf (asf,  "TOTAL  EMPLOYEE  DETAILS  PRINTED=  %ld\n",  aggregate . tot_ee_det_jDrin 

fprintf (asf,  "TOTAL  PRINT  FINAL  TOTALS  SELECTIONS=  %ld\n",  aggregate . tot_pr_f in 

fprintf (asf,  "TOTAL  PRINT  BLANKET  REPORT  SELECTIONS  = %ld\n",  aggregate . tot_pr_ 

fprintf (asf,  "TOTAL  REPORTS  PRINTED  = %ld\n",  aggregate . tot_pr_report ) ; 
f close  (asf) ; 

printf ("STATS  HAVE  BEEN  WRITTEN  TO  THE  ASCII  FILE  %s\n\n",  ASTATFILE) ; 


} //end  of  display  and  write 
} //end  of  display  and  write  stats  to  text  file 
} //end  of  uf  !=  NULL 
} / /end  of  get  user  number 

} //end  of  sf  !=  NULL 
} //END  OF  MAIN 
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//custom. c 
//created  10/12/93 

//holds  user  defined  functions  used  in  usercode.c 
//Laura  L.  Downey,  NIST,  computer  scientist 

#include  <WINDOWS.H> 

#include  "GENERIC. H" 

#include  <fcntl.h> 

#include  <io.h> 


//  STRING  FUNCTIONS 


/**********************************CREATEHEADERSTRING********************** ********/ 
void  CreateHeaderString { ) /**  added  6/19/92  by  LLD  **/ 

/**  function  creates  browse  header  info  **/ 

{ 

Headerstring [0]  = 0; 

street (Headerstring, "\n  RPT-YR:  ")  ; 

streat (Headerstring, CurrEmprInfo .ReportYear) ; 
street (Headerstring, " RPT-NO:  ") ; 

streat (Headerstring, CurrEmprInfo . seq_no) ; 
streat (Headerstring, " EIN:  ") ; 

streat (Headerstring, CurrEmprInfo .EIN) ; 
streat (Headerstring, " TYPE:  ") ; 

streat (Headerstring, CurrEmprInfo . TypeEmpr) ; 
streat (Headerstring, "\n\n  ") ; 

streat (Headerstring, CurrEmprInfo .EmprName) ; 
streat (Headerstring, "\n  ") ; 

streat (Headerstring, CurrEmprInfo .EmprStreetAdd) ; 
streat (Headerstring, "\n  ") ; 

streat (Headerstring, CurrEmprInfo . EmprCity) ; 
streat (Headerstring, ",  ") ; 

streat (Headerstring, CurrEmprInfo . EmprState) ; 
streat (Headerstring, " ") ; 

streat (Headerstring, CurrEmprInfo . EmprZipCode) ; 

} //END  OF  CREATEHEADERSTRING 


/************************* *****qr£j^T£HI52TAILSTRING**** ******* *****^* ******* *********/ 
void  CreateHDetailString ( ) /**  added  07/01/92  by  LLD  **/ 

/**  function  creates  detail  header  info  **/ 

{ 

HDetailString[0]  = 0; 

streat (HDetailString, CurrEmprInfo . EmprName) ; 
streat (HDetailString, "\tRPT-NO:  ")  ; 
streat (HDetailString, CurrEmprInfo . seq_no) ; 

streat (HDetailString, "\n") ; 

streat (HDetailString, CurrEmprInfo . EmprStreetAdd) ; 
streat (HDetailString, "\n") ; 

streat (HDetailString, CurrEmprInfo . EmprCity) ; 
streat (HDetailString, ",  ") ; 

streat (HDetailString, CurrEmprInfo . EmprState) ; 
streat (HDetailString, " ") ; 

streat (HDetailString, CurrEmprInfo . EmprZipCode) ; 

streat (HDetailString, "\n\n") ; 

streat (HDetailString, "EIN:  ") ; 

streat (HDetailString, CurrEmprInfo . EIN) ; 

streat (HDetailString, "\t\t\tTape  Library  Number:  ") ; 
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strcat (HDetailString, CurrEmprInf o . TapeLibNum) ; 

strcat (HDetailString, "\n") ; 

strcat (HDetailString, "Starting  MRN:  ") ; 

strcat (HDetailString, CurrEmprInfo.MRN) ; 

strcat (HDetailString, "\t\tOther  EIN:  ") ; 

strcat (HDetailString, CurrEmprInf o . OtherEIN) ; 

strcat (HDetailString, "\n") ; 

strcat (HDetailString,  "Ending  MRN:  ")  ; 

strcat (HDetailString,  CurrEmprInfo.EndMRN) ; 

strcat (HDetailString, "\t\tEstab  Number:  "); 

strcat (HDetailString, CurrEmprInfo. EstabNumber) ; 

strcat (HDetailString, "\n") ; 

strcat (HDetailString, "Report  Year:  "); 

strcat (HDetailString, CurrEmprInfo . ReportYear) ; 

strcat (HDetailString, "\t\t\tType  of  Employment:  ") ; 

strcat (HDetailString, CurrEmprInfo . TypeEmpr) ; 

strcat (HDetailString, "\n") ; 

strcat (HDetailString, "Process  Year:  "); 

strcat (HDetailString, CurrEmprInfo . ProcessYear ) ; 

strcat (HDetailString, "\t\tName  Code:  ") ; 

strcat (HDetailString, CurrEmprInfo , NameCode) ; 

strcat (HDetailString, "\n") ; 

/**  this  section  added  7/16/92  by  LLD  - produces  a string  to  be  sent  to  the  printer  **/ 
PHDetailString[0]  = 0; 

strcpy (PHDetailString,  "EMPLOYER  HEADER  DETAIL\n\n") ; 
strcat (PHDetailString, CurrEmprInfo . EmprName) ; 
strcat (PHDetailString, "\t\tRPT-NO:  ")  ; 
strcat (PHDetailString, CurrEmprInfo . seq_no) ; 

strcat (PHDetailString,  "\n")  ; 

strcat (PHDetailString, CurrEmprInfo . EmprStreetAdd) ; 
strcat (PHDetailString,  "\n")  ; 

strcat (PHDetailString, CurrEmprInfo . EmprCity) ; 
strcat (PHDetailString, ",  ") ; 

strcat (PHDetailString, CurrEmprInfo . EmprState) ; 
strcat (PHDetailString,  " ")  ; 

strcat (PHDetailString, CurrEmprInfo . EmprZipCode) ; 

strcat (PHDetailString, "\n\n") ; 

strcat (PHDetailString, "EIN:  ")  ; 

strcat (PHDetailString, CurrEmprInfo. EIN) ; 

strcat (PHDetailString, "\t\t\tTape  Library  Number:  ") ; 

strcat (PHDetailString, CurrEmprInfo . TapeLibNum) ; 

strcat (PHDetailString, "\n") ; 

strcat (PHDetailString, "Starting  MRN:  "); 

strcat (PHDetailString, CurrEmprInfo .MRN) ; 

strcat (PHDetailString, "\t\tOther  EIN:  ")  ; 

strcat (PHDetailString, CurrEmprInfo . OtherEIN) ; 

strcat (PHDetailString, "\n") ; 

strcat (PHDetailString,  "Ending  MRN:  ") ; 

strcat (PHDetailString, CurrEmprInfo . EndMRN) ; 

strcat (PHDetailString, "\t\tEstab  Number:  "); 

strcat (PHDetailString, CurrEmprInfo . EstabNumber) ; 

strcat (PHDetailString, "\n") ; 

strcat (PHDetailString, "Report  Year:  ")  ; 

strcat (PHDetailString, CurrEmprInfo . ReportYear) ; 

strcat (PHDetailString, "\t\t\tType  of  Employment:  ") ; 

strcat (PHDetailString, CurrEmprInfo . TypeEmpr) ; 

strcat (PHDetailString, "\n") ; 

strcat (PHDetailString, "Process  Year:  ")  ; 

strcat (PHDetailString, CurrEmprInfo . ProcessYear) ; 

strcat (PHDetailString, "\t\t\tName  Code:  ")  ; 

strcat (PHDetailString, CurrEmprInfo. NameCode) ; 
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} //END  OF  CREATEHDETAILSTRING 


/******************************createedetail**********************************/ 
void  CreateEDetail ( ) /**  added  07/06/92  by  LLD  **/ 

/**  function  creates  detail  employee  info  **/ 

{ 

EDetailString[0]  = 0; 
strcat (EDetailString, "SSN:  ") ; 
strcat (EDetailString, EDetail . EmpSSN) ; 
strcat (EDetailString, "\t\t\tRPT-NO:  "); 
strcat (EDetailString, CurrEmprInfo. seq_no) ; 

strcat (EDetailString, "\n\n") ; 

strcat (EDetailString, EDetail .EmpName) ; 

strcat (EDetailString, "\n") ; 

strcat (EDetailString,EDetail.EmpStreetAdd) ; 

strcat (EDetailString, "\n") ; 

strcat (EDetailString, EDetail . EmpCity) ; 

strcat (EDetailString, ",  ") ; 

strcat (EDetailString, EDetail . EmpState) ; 

strcat (EDetailString, " ") ; 

strcat (EDetailString, EDetail . EmpZipCode) ; 

strcat (EDetailString, ”\n\n\n") ; 

strcat (EDetailString, "FICA  Wages:  ") ; 

strcat (EDetailString, EDetail. AnnFICAWages) ; 

strcat (EDetailString, "\t\tPension  Indicator:  ”) ; 

strcat (EDetailString, EDetail . Pensionind) ; 

strcat (EDetailString,  "An”) ; 

strcat (EDetailString, "FICA  Tips:  ") ; 

strcat (EDetailString, EDetail .AnnFICATips) ; 

strcat (EDetailString, "\t\tDefComp  Indicator:  ") ; 

strcat (EDetailString, EDetail .DefCompInd) ; 

strcat (EDetailString, "\n") ; 

strcat (EDetailString, "Wgs\Tps\Other : ") ; 

strcat (EDetailString, EDetail .AnnWgsTpsOther) ; 

strcat (EDetailString, "\t\tDef  Comp  Amt:  ") ; 

strcat (EDetailString, EDetail. DefCompAmt) ; 

strcat (EDetailString, "\n") ; 

strcat (EDetailString, "FICA  Tax:  ") ; 

strcat (EDetailString, EDetail . FICATaxWheld) ; 

strcat (EDetailString, "\t\t\tSta:  ") ; 

strcat (EDetailString, EDetail . StatEmpCode) ; 

strcat (EDetailString, "\n") ; 

strcat (EDetailString, "Federal  Tax:  "); 

strcat (EDetailString, EDetail . FedTaxWheld) ; 

strcat (EDetailString, "\t\tFr  Benefits:  ") ; 

strcat (EDetailString, EDetail . FringeBenef its ) ; 

strcat (EDetailString, "\n") ; 

strcat (EDetailString, "Uncollected  FICA:  ") ; 

strcat (EDetailString, EDetail .UncFICATipTax) ; 

strcat (EDetailString, "\t\tEmpr  Grp  Trm  Ins  Cost:  ") ; 

strcat (EDetailString, EDetail. EmprGrpTrmlnsCost) ; 

strcat (EDetailString, "\n") ; 

strcat (EDetailString, "Medicare  Wages:  ") ; 

strcat (EDetailString, EDetail .MedWages) ; 

strcat (EDetailString, "\tDep  Care:  ") ; 

strcat (EDetailString, EDetail .DepCare) ; 

strcat (EDetailString, "\n") ; 

strcat (EDetailString, "Medicare  Tax:  ") ; 

strcat (EDetailString, EDetail .MedTax) ; 

strcat (EDetailString, "\t\tNQSEC:  ") ; 
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strcat (EDetailString, EDetail . nqsec) ; 
strcat (EDetailString,  "\n")  ; 
strcat (EDetailString, "Allocated  Tips:  ") ; 
strcat (EDetailString, EDetail .AllocTips) ; 
strcat (EDetailString, "\t\tNQNOT:  ") ; 
strcat (EDetailString, EDetail . nqnot ) ; 
strcat (EDetailString,  "\n")  ; 
strcat (EDetailString, "Adv  Earn  Inc:  ") ; 
strcat (EDetailString, EDetail .AdvEarnInc) ; 
strcat (EDetailString, "\t\tCtrl  Number:  ") ; 
strcat (EDetailSt ring, EDetail . ControlNumber) ; 


/**  this  section  added  7/16/92  by  LLD  - produces  a string  to  be  sent  to  the  printer  **/ 
PEDetailString[0]  = 0; 
strcat (PEDetailString, "SSN:  ") ; 
strcat (PEDetailString, EDetail . EmpSSN) ; 
strcat (PEDetailString, " \t \t \tRPT-NO : ") ; 

strcat (PEDetailString, CurrEmprInf o , seq_no) ; 

strcat (PEDetailString, "\n\n")  ; 

strcat (PEDetailString, EDetail . EmpName) ; 

strcat (PEDetailString,  "\n")  ; 

strcat (PEDetailString, EDetail . EmpStreetAdd) ; 

strcat (PEDetailString,  "\n")  ; 

strcat (PEDetailString, EDetail . EmpCity ) ; 

strcat (PEDetailString,  ",  ")  ; 

strcat (PEDetailString, EDetail . EmpState) ; 

strcat (PEDetailString,  " ")  ; 

strcat (PEDetailString, EDetail . EmpZipCode) ; 

strcat (PEDetailString, "\n\n\n")  ; 

strcat (PEDetailString, "FICA  Wages:  ") ; 

strcat (PEDetailString, EDetail .AnnFICAWages) ; 

strcat (PEDetailString, "\t\t\tPension  Indicator:  ") ; 

strcat (PEDetailString, EDetail . Pensionind) ; 

strcat (PEDetailString, "\n")  ; 

strcat (PEDetailString, "FICA  Tips:  ") ; 

strcat (PEDetailString, EDetail .AnnFICATips) ; 

strcat (PEDetailString, "\t\t\tDefComp  Indicator:  ") ; 

strcat (PEDetailString, EDetail . Def Compind) ; 

strcat (PEDetailString, "\n")  ; 

strcat (PEDetailString, "Wgs\Tps\Other : ")  ; 

strcat (PEDetailString, EDetail .AnnWgsTpsOther) ; 

strcat (PEDetailString, "\t\tDef  Comp  Amt:  ") ; 

strcat (PEDetailString, EDetail .Def CompAmt) ; 

strcat (PEDetailString,  "\n") ; 

strcat (PEDetailString, "FICA  Tax:  "); 

strcat (PEDetailString, EDetail . FICATaxWheld) ; 

strcat (PEDetailString, "\t\t\tSta:  ") ; 

strcat (PEDetailString, EDetail . StatEmpCode) ; 

strcat (PEDetailString, "\n") ; 

strcat (PEDetailString, "Federal  Tax:  "); 

strcat (PEDetailString, EDetail . FedTaxWheld) ; 

strcat (PEDetailString, "\t\tFr  Benefits:  ") ; 

strcat (PEDetailString, EDetail . FringeBenef its) ; 

strcat (PEDetailString, "\n") ; 

strcat (PEDetailString, "Uncollected  FICA:  "); 

strcat (PEDetailString, EDetail . UncFICATipTax) ; 

strcat (PEDetailString, "\t\tEmpr  Grp  Trm  Ins  Cost:  "); 

strcat (PEDetailString, EDetail . EmprGrpTrmlnsCost ) ; 

strcat (PEDetailString, "\n") ; 

strcat (PEDetailString, "Medicare  Wages:  ") ; 

strcat (PEDetailString, EDetail .MedWages) ; 
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strcat (PEDetailString, ”\t \tDep  Care:  ")  ; 
strcat (PEDetailString, EDetail .DepCare) ; 
strcat (PEDetailString, "Xn") ; 
strcat (PEDetailString, "Medicare  Tax:  ")  ; 
strcat (PEDetailSt ring, EDetail .MedTax) ; 
strcat (PEDetailString, "\t \t\tNQSEC:  ")  ; 
strcat (PEDetailString, EDetail . nqsec)  ; 
strcat (PEDetailString, "\n") ; 
strcat (PEDetailString, "Allocated  Tips:  ")  ; 
strcat (PEDetailSt ring, EDetail .AllocTips) ; 
strcat (PEDetailString, "\t\tNQNOT:  ")  ; 
strcat (PEDetailString, EDetail. nqnot)  ; 
strcat (PEDetailString, "\n")  ; 
strcat (PEDetailString, "Adv  Earn  Inc:  "); 
strcat (PEDetailString, EDetail .AdvEarnInc)  ; 
strcat (PEDetailString, "\t\t\tCtrl  Number:  ") ; 
strcat (PEDetailString, EDetail . ControlNumber) ; 

} //END  OF  CREATEEDETAIL 


/*********************************  C X E T I T LE  P AGE  **************************************  / 
void  CreateTitlePage (PTitle)  /**  function  creates  a title  page  for  blanket  report  */ 
char  PTitle [800]; 

{ 

PTitle [0]  = 0; 

strcat (PTitle, "BLANKET  REPORT\n\n") ; 
strcat (PTitle, CurrEmprInfo . EmprName)  ; 
strcat (PTitle, "\n")  ; 

strcat (PTitle, CurrEmprInfo . EmprStreetAdd) ; 
strcat (PTitle, "\n") ; 

strcat (PTitle, CurrEmprInfo . EmprCity) ; 
strcat (PTitle, ",  ") ; 

strcat (PTitle, CurrEmprInfo . EmprState) ; 
strcat (PTitle, " ") ; 

strcat (PTitle, CurrEmprInfo . EmprZipCode)  ; 
strcat (PTitle, "\n\nRPT-YR: \t") ; 
strcat (PTitle, CurrEmprInfo . ReportYear)  ; 
strcat (PTitle, "\nRPT-NO: \t") ; 
strcat (PTitle, CurrEmprInfo . seq_no) ; 

strcat (PTitle, "\nEST: \t") ; 

strcat (PTitle, CurrEmprInfo . EstabNumber) ; 

strcat (PTitle, "\nEIN: \t") ; 

strcat (PTitle, CurrEmprInfo . EIN) ; 

strcat (PTitle, "\nTYPE: \t") ; 

strcat (PTitle, CurrEmprInfo . TypeEmpr) ; 

CreateTotalString ( ) ; 
strcat (PTitle, "\n\n") ; 
strcat (PTitle, PTotalString) ; 

} //END  OF  CREATETITLEPAGE 


/****************************** **qrej^tetotalstring*************************************/ 


void  CreateTotalString ( ) 
{ 


/**  added  8/19/92  by  LLD  **/ 

/**  create  a total  string  for  display  and  printing  **/ 


Totalstring [0]  = 0; 
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strcat (Totalstring, " FICA  Wages\t\t"); 

strcat (Totalstring, CurrEmprInfo .ProcFICAWages)  ; 

strcat (Totalstring, "\t\t") ; 

strcat (Totalstring, CurrEmprInfo. RepFICAWages) ; 
strcat (Totalstring, "\n\n  ") ; 

strcat (Totalstring, "FICA  Tips\t\t") ; 
strcat (Totalstring, CurrEmprInfo. ProcFICATips) ; 
strcat (Totalstring, "\t\t") ; 

strcat (TotalString,CurrEmprInfo.RepFICATips) ; 

strcat (Totalstring, "\n\n  ") ; 

strcat (Totalstring, "Wgs/Tps/Other\t\t") ; 

strcat (Totalstring, CurrEmprInfo . ProcWgsTpsOther) ; 

strcat (Totalstring, "\t\t") ; 

strcat (Totalstring, CurrEmprInfo . RepWgsTpsOther)  ; 

strcat (Totalstring, "\n\n  ") ; 

strcat (Totalstring, "FICA  Tax  W/H\t\t") ; 

strcat (Totalstring, CurrEmprInfo . ProcFICATaxWheld) ; 

strcat (Totalstring, "\t\t") ; 

strcat (Totalstring, CurrEmprInfo . RepFICATaxWheld)  ; 
strcat (Totalstring, "\n\n  ") ; 

strcat (Totalstring, "Medicare  Wgs\t\t") ; 
strcat (Totalstring, CurrEmprInfo. ProcMedWages) ; 
strcat (Totalstring, "\t\t") ; 

strcat (Totalstring, CurrEmprInfo. RepMedWages) ; 
strcat (Totalstring, "\n\n  ") ; 

strcat (Totalstring, "Medicare  Tax\t\t") ; 
strcat (Totalstring, CurrEmprInfo . ProcMedTax) ; 
strcat (Totalstring, "\t\t") ; 

strcat (Totalstring, CurrEmprInfo . RepMedTax) ; 

strcat (Totalstring, "\n\n  ") ; 

strcat (Totalstring,  "Nuidoer  of  Items\t\t") ; 

strcat  (Totalstring, CurrEirprInfo.ProcItems)  ; 

strcat (Totalstring, "\t\t\t") ; 

strcat (Totalstring, CurrEmprInfo.RepItems) ; 

strcat (Totalstring, "\n\n\n  ") ; 

strcat (Totalstring, "Fed  Tax  W/H\t\t") ; 

strcat (Totalstring, CurrEmprInfo . ProcFedTaxWheld)  ; 

strcat (Totalstring, "\t\t") ; 

strcat (Totalstring, CurrEmprInfo . RepFedTaxWheld) ; 
strcat (Totalstring, "\n\n  ") ; 

strcat (Totalstring, "Earned  Income\t\t") ; 
strcat (Totalstring, CurrEmprInfo . ProcEarnInc)  ; 
strcat (Totalstring, "\t\t")  ; 

strcat (Totalstring, CurrEmprInfo . RepEarnInc) ; 
strcat (Totalstring, "\n\n  "); 

strcat (Totalstring, "DefComp\t\t") ; 
strcat (Totalstring, CurrEmprInfo . ProcDefComp) ; 
strcat (Totalstring, "\t\t")  ; 

strcat (Totalstring, CurrEmprInfo . RepDefComp)  ; 
strcat (Totalstring, "\n\n  ")  ; 

strcat (Totalstring, "NonEqual\t\t" ) ; 
strcat (Totalstring, CurrEmprInfo . ProcNonequal) ; 
strcat (Totalstring, "\t\t")  ; 

strcat (Totalstring, CurrEmprInfo . RepNonequal)  ; 


PTotalString [0 ] = 0; 

strcat (PTotalString, "TYPE : \t \t \tPROCESSED : \t XtREPORTED : \n\n" ) 
strcat (PTotalString, "FICA  WagesXtXt") ; 
strcat (PTotalString, CurrEmprInfo. ProcFICAWages) ; 
strcat (PTotalString, "\t\t") ; 

strcat (PTotalString, CurrEmprInfo . RepFICAWages) ; 
strcat (PTotalString, "\n") ; 
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street (PTotalString, "FICA  Tips\t\t") ; 

streat (PTotalString,CurrEmprInfo.ProcFICATips)  ; 

street (PTotalString, "\t\t") ; 

streat (PTotalString,CurrEmprInfo.RepFICATips) ; 

streat (PTotalString, ”\n") ; 

streat (PTotalString, "Wgs/Tps/Other\t\t") ; 

streat (PTotalString, CurrEmprInf o . ProeWgsTpsOther ) ; 

streat (PTotalString,  "\t\t")  ; 

streat (PTotalString, CurrEmprInf o.RepWgsTpsOther) ; 

streat (PTotalString,  "\n")  ; 

streat  (PTotalString,  *'FICA  Tax  W/H\t\t")  ; 

streat (PTotalString, CurrEmprInf o.ProeFICATaxWheld) ; 

streat (PTotalString, "\t\t")  ; 

streat (PTotalString, CurrEmprInf o . RepFICATaxWheld) ; 
streat (PTotalString, "\n") ; 
streat (PTotalString, "Medieare  Wgs\t\t") ; 
streat (PTotalString, CurrEmprInf o . ProeMedWages) ; 
streat (PTotalString, "\t\t") ; 

streat (PTotalString, CurrEmprInf o.RepMedWages) ; 
streat  (PTotalString,  '’\n'*)  ; 
streat (PTotalString, "Medieare  Tax\t\t") ; 
streat (PTotalString, CurrEmprInf o . ProeMedTax) ; 
streat (PTotalString, "\t\t")  ; 

streat (PTotalString, CurrEmprInf o . RepMedTax) ; 
streat (PTotalString, "\n") ; 

streat (PTotalString,  "Number  of  Items\t\t") ; 

streat (PTotalString, CurrEmprInf o. Proeltems) ; 

streat (PTotalString, "\t\t\t")  ; 

streat (PTotalString, CurrEmprInf o . Repitems) ; 

streat (PTotalString, ”\n\n") ; 

streat (PTotalString, "Fed  Tax  W/H\t\t") ; 

streat (PTotalString, CurrEmprInf o . ProeFedTaxWheld) ; 

streat (PTotalString, "\t\t")  ; 

streat (PTotalString, CurrEmprInf o.RepFedTaxWheld) ; 
streat (PTotalString, "\n") ; 
streat (PTotalString, "Earned  Ineome\t\t") ; 
streat (PTotalString, CurrEmprInf o . ProeEarnIne)  ; 
streat (PTotalString, "\t\t")  ; 

streat (PTotalString, CurrEmprInf o . RepEarnIne) ; 

streat (PTotalString, "\n") ; 

streat (PTotalString, "DefComp\t\t\t") ; 

streat (PTotalString, CurrEmprInf o . ProeDefComp) ; 

streat (PTotalString, "\t\t")  ; 

streat (PTotalString, CurrEmprInf o . RepDef Comp) ; 

streat (PTotalString, "\n") ; 

streat (PTotalString, "NonEqual\t\t")  ; 

streat (PTotalString, CurrEmprInf o . ProeNonequal) ; 

streat (PTotalString, "\t\t")  ; 

streat (PTotalString, CurrEmprInf o . RepNonequal) ; 

} //END  OF  CREATETOTALSTRING 


/ ********************************CR2^TEPRINTT0TSTRING***** ************************* ******* 

/ 

void  CreatePrintTotString ( ) /**  added  8/19/92  by  LLD  **/ 

/**  ereate  a total  string  for  printing  **/ 

{ 

ehar  Title []  = "REPORT  TOTALS\n\n";  /**  title  line  for  report  total  printout  **/ 

PrintTotStringCO]  = 0; 

streat (PrintTotString, Title) ; /**  eoneatenate  title  **/ 
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CreateHDetailString ( ) ; 

strcat (PrintTotString, PHDetailString) ; 

strcat (PrintTotString, "\n") ; 

strcat (PrintTotString, separatorstring) ; 

strcat (PrintTotString, "\n") ; 

strcat (PrintTotString, PTotalString) ; 

} //END  OF  CREATEPRINTTOTSTRING 


/**  create  header  info  **/ 

/**  concatenate  header  info  **/ 

/**  concatenate  separator  string  **/ 

/**  concatenate  total  print  string  **/ 


/********************************0P£^-I>EPRINTEDETAIL************************************* 
void  CreatePrintEDetail ( ) /**  added  8/19/92  by  LLD  **/ 

/**  creates  an  employee  detail  for  printing  **/ 

{ 

char  Title []  = "EMPLOYEE  DETAIL\n\n";  /**  title  line  for  report  total  printout 

*/ 


PrintEDetail [0 ] = 0; 

strcat (PrintEDetail, Title) ; 

CreateHDetailString ( ) ; 

strcat (PrintEDetail, PHDetailString) ; 

strcat (PrintEDetail, "\n") ; 

strcat (PrintEDetail, separatorstring) ; 

strcat (PrintEDetail, "\n") ; 

strcat (PrintEDetail, PEDetailString) ; 

} //END  OF  CREATEPRINTEDETAIL 


/*******************************copyBLANKET_EDETAIL*** *********************** **********/ 
void  CopyBlanket_EDet ail (index)  /**  copies  current  blanket  detail  to  EDetail  **/ 

int  index;  /**  passed  parameter  **/ 

{ 

St rcpy (EDetail .MRN,  Blanket [index] .MRN) ; 
strcpy (EDetail . EmpSSN,  Blanket [index] .EmpSSN); 

St rcpy (EDetail . EmpName,  Blanket [index] .EmpName); 
strcpy (EDetail . Pensionind,  Blanket [index] .Pensionind) ; 
strcpy (EDetail .DefCompInd,  Blanket [index] .DefCompInd) ; 
strcpy (EDetail .AnnFICAWages,  Blanket [index] .AnnFICAWages) ; 
strcpy (EDetail . AnnFICATips,  Blanket [index] . AnnFICATips) ; 
strcpy (EDetail . AnnWgsTpsOther,  Blanket [index] .AnnWgsTps Other) ; 
strcpy (EDetail . FedTaxWheld,  Blanket [index] .FedTaxWheld); 
strcpy (EDetail . FICATaxWheld,  Blanket [index] .FICATaxWheld); 
strcpy (EDetail .AdvEarnInc,  Blanket [index] .AdvEarnInc); 
strcpy (EDetail .MedWages,  Blanket [index] .MedWages) ; 
strcpy (EDetail .MedTax,  Blanket [index] .MedTax); 
strcpy (EDetail . ControlNumber,  Blanket [index] .ControlNumber); 

strcpy (EDetail . EmpStreetAdd,  Blanket[index]-EmpStreetAdd); 

strcpy (EDetail . DepCare,  Blanket [index] .DepCare) ; 

strcpy (EDetail .AllocTips,  Blanket [index] .AllocTips) ; 

strcpy (EDetail . EmprGrpTrmlnsCost , Blanket [index] . EmprGrpTrmlnsCost) ; 

strcpy (EDetail . UncFICATipTax,  Blanket [index] .UncFICATipTax); 

strcpy (EDetail . EmpCity,  Blanket [index] .EmpCity); 
strcpy (EDetail . EmpState,  Blanket [index] .EmpState); 
strcpy (EDetail . EmpZipCode,  Blanket [index] . EmpZipCode) ; 
strcpy (EDetail . DefCompAmt,  Blanket [index] .DefCompAmt) ; 
strcpy (EDetail . StatEmpCode,  Blanket [index] . StatEmpCode) ; 
strcpy (EDetail . FringeBenef its.  Blanket [index] . FringeBenef its) ; 
strcpy (EDetail . nqsec.  Blanket [index] . nqsec) ; 
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strcpy (EDetail . nqnot.  Blanket [index] .nqnot); 


} 


//END  OF  COPYBLANKET  EDETAIL 
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//Filename:  EAMAT42.C 

//"EAMAT42"  Generated  by  WindowsMAKER  Professional 
//Author:  Laura  L.  Downey 

// 

//  Code  in  this  file  is  initially  generated  by  WindowsMAKER  Professional. 

/ / This  file  contains  the  WINMAIN  and  the  MAINWINPROC  functions . 

//  You  can  override  the  functionality  supplied  by  WindowsMAKER  Professional 
//  by  adding  your  own  code  or  replacing  calls  in  this  file.  For  example  if 
//  you  want  to  change  the  normal  flow  of  events  and  bring  up  a login  box 
//  before  the  main  window  is  displayed,  you  would  add  the  code  here. 

//  For  more  information  see  the  section  "How  Code  is  Generated"  in  the 
//  documentation. 


#include  <WINDOWS.H> 

#include  "GENERIC. H" 

WMPDEBUG 

tinclude  "EAMAT42 . WMC" 

tinclude  "main.h"  //defines  variables  used  for  displaying  credit  window  - LLD  6/18/9 

3 

extern  unsigned_st]clen  = 43210; 

//************************************************************* 

//  WinMain  FUNCTION 

int  PASCAL  WinMain (HINSTANCE  hinstance,  HINSTANCE  hPrevInstance,  LPSTR  IpCmdLine,  int  nCmd 
Show) 

{ 

MSG  msg;  //  message 

hinst  = hinstance;  //  Saves  the  current  instance 

if  ( ! BLDInitApplication (hinstance, hPrevInstance, SnCmdShow, IpCmdLine) ) 
return  FALSE; 

if  (! hPrevInstance)  //  Is  there  an  other  instance  of  the  task 

{ 

if  ( ! BLDRegisterClass (hinstance) ) 

return  FALSE;  //  Exits  if  unable  to  initialize 

} 

MainhWnd  = BLDCreateWindow (hinstance) ; 

if  (! MainhWnd)  //  Check  if  the  window  is  created 

return  FALSE; 

ShowWindow (MainhWnd,  nCmdShow) ; //  Show  the  window 

UpdateWindow (MainhWnd) ; //  Send  WM_PAINT  message  to  window 


/****★  added  section  (6/18/93)  to  display  credits  in  main  window  *****/ 
/*******  About  Dialog  Box  in  Main  Window  **************************** 

IpProc  = MakeProcInstance ( (FARPROC) BLD_FunctionDlgProc,  hinst); 

AbouthWnd  = DialogBox (hinst , (LPSTR) "MAINl",  MainhWnd,  IpProc); 
FreeProcInstance (IpProc) ; 

ShowWindow (AbouthWnd, SW_SHOW) ; 

UpdateWindow (AbouthWnd) ; 


* * / 


/********************************************************************************* 


/ 


BLDInitMainMenu (MainhWnd) ; //  Initialize  main  menu  if  necessary 
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} 


while  (GetMessage {&msg, 

0, 

0, 

0)  ) 


//  message  structure 

//  handle  of  window  receiving  the  message 
//  lowest  message  to  examine 
//  highest  message  to  examine 


{ 

if  (BLDKeyTranslation (&msg) ) //  WindowsMAKER  code  for  key  translation 
continue; 

TranslateMessage (&msg) ; //  Translates  character  keys 
DispatchMessage  (&msg) ; //  Dispatches  message  to  window 

} 


BLDExitApplication ( ) ; //  Clean  up  if  necessary 

return (msg.wParam) ; //  Returns  the  value  from  PostQuitMessage 


//***************************************** ******************** 

//  WINDOW  PROCEDURE  FOR  MAIN  WINDOW 

//************************************************************* 

LONG  FAR  PASCAL  BLDMainWndProc (HWND  hWnd,  UINT  message,  UINT  wParam,  LONG  IParam 

{ 

switch  (message) 

{ 

case  WM_CREATE:  //  window  creation 

//  Send  to  BLDDefWindowProc  in  (.WMC)  for  controls  in  main  window 

return  BLDDefWindowProc (hWnd,  message,  wParam,  IParam); 

break; 

case  WM_SETFOCUS : //  window  is  notified  of  focus  change 

//  Send  to  BLDDefWindowProc  in  (.WMC)  for  controls  in  main  window 

return  BLDDefWindowProc (hWnd,  message,  wParam,  IParam); 

break; 

case  WM_DESTROY:  //  window  being  destroyed 

PostQuitMessage (0) ; 

return  BLDDefWindowProc (hWnd,  message,  wParam,  IParam); 
break; 

case  WM_COMMAND:  //  command  from  the  main  window 

if  (BLDMenuCommand (hWnd,  message,  wParam,  IParam)  ) 

break;  //  Processed  by  BLDMenuCommand - 

//  else  default  processing  by  BLDDefWindowProc. 

default : 

/ / Pass  on  message  for  default  processing 

return  BLDDefWindowProc (hWnd,  message,  wParam,  IParam); 

} 

return  FALSE;  //  Returns  FALSE  if  processed 

} 


j / ************************************************************* 

//  INIT  & EXIT  FOR  MAIN  WINDOW 

II  ************************************************************* 

BOOL  BLDMainRegClass (HINSTANCE  hinstance) 

{ 

return  BLDMainRegClassDef (hinstance)  ; 

} 
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BOOL  BLDMainExitClass  ( ) 

{ 

return  BLDMainExitClassDef ( ) ; 

} 


HWND  BLDMainCreateWnd ( ) 

{ 

return  BLDMainCreateWndDef () ; 

} 
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//  Filename:  ERROR. C 

//  "EAMAT42”  Generated  by  WindowsMAKER  Professional. 

//  Author:  Laura  L.  Downey,  NIST,  computer  scientist 

//  created  10/28/93 

//  holds  error  dialog  and  message  boxes  used  in  usercode.c 


tinclude  "WINDOWS. H" 
#include  "GENERIC. H" 

WMPDEBUG 

tinclude  "ERROR. WMC" 


//  ERROR  DIALOGS  AND  MESSAGE  BOXES 

/*********************************************************************/ 
/**  error  box  when  employer  report  can't  be  found  using  current  EIN  **/ 
/*****************************************************************★***/ 

II  ************************************************************** 

//  Modal  Dialog  Box:  EINERROR 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_EINErrDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

return  BLD_EINErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_EINErrDlgProc (HWND  hDlg,UINT  message, WPARAM  wP a ram, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_EINErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  (! BLD_EINErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK)  ; 
break; 

case  IDCANCEL: 

if  (! BLD_EINErrDlgDef ault (hDlg, message,  wParam,  IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default: 

return  BLD_EINErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
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default : 

return  BLD_EINErrDlgDef ault (hDlg, message, wParam, iParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  EIN  ERROR  MESSAGE  BOX 


/************★***★********************************************************/ 

/*  displays  error  message  box  when  user  does  not  enter  proper  query  info  */ 
/**********************★**************************************************/ 

II  ************************************************************** 

//  Modal  Dialog  Box:  QMSG 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_QueryMessageDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_QueryMessageDlgFuncDef (hWnd, (char  *)NULL); 

} 


/ / Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_QueryMessageDlgP roc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_QueryMessageDlgDe fault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND : 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_QueryMessageDlgDefault (hDlg,message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_QueryMessageDlgDefault (hDlg,message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_QueryMessageDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_QueryMessageDlgDef ault (hDlg,message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  QUERY  ERROR  MESSAGE  BOX 


error . c 


Wed  Mar  2 14:13:54  1994 


3 


/**************************************************************************** 
Displays  error  message  if  both  the  first  and  last  name  are  not 
entered  if  user  wants  to  search  by  employee  name 
**********************************************************★******************/ 

II  ************************************ ************************** 

//  Modal  Dialog  Box:  NMSG 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_NMSGDlgFunc (HWND  hWnd,UINT  message, WPAPAM  wParam, LPARAM  IParam) 

{ 

return  BLD_NMSGDlgFuncDef (hWnd, (char  *)NULL); 

} 


/ / Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_NMSGDlgProc (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_NMSGDlgDefault (hDlg, message, wParam, IParam)  ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_NMSGDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_NMSGDlgDef  ault  (hDlg,  message,  wParam,  IParam)  ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_NMSGDlgDef  ault  (hDlg,message,  wParam,  IParam)  ; 
break; 

} 

break; 
default : 

return  BLD_NMSGDlgDef ault (hDlg, message, wParam, IParam)  ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  BOTH  FN  & LN  ERROR  MESSAGE  BOX 


/****************************************************************/ 
/**  error  box  that  appears  when  a search  error  has  occurred 

during  a single-query  search  **/ 

/****************************************************************/ 
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II  ************************ ************************************** 

//  Modal  Dialog  Box:  QUERYERROR 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_QueryErrDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_QueryErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_QueryErrDlgProc (HWND  hDlg,UINT  message, WPARAM  wP a ram, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_QueryErrDlgDef ault (hDlg, message,  wParam,  IParam)  ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  (! BLD_QueryErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_QueryErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_QueryErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_QueryErrDlgDef ault (hDlg, message,  wParam,  IParam)  ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  SINGLE  QUERY  ERROR  MESSAGE  BOX 


/****************************************************************/ 

/**  error  box  that  appears  when  a search  error  has  occurred 

concerning  the  blanket  report  **/ 

/****************************************************************/ 

II  ************************************************************** 

//  Modal  Dialog  Box:  BLANKETERROR 

II  ************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_BlanketErrDlgFunc (HWND  hWnd, UINT  message, WPARAM  wParam, LPARAM  IParam) 
{ 
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return  BLD_BlanketErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_BlanketErrDlgProc (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_BlanketErrDlgDefault (hDlg, message, wParam,  IParam)  ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_BlanketErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_BlanketErrDlgDefault (hDlg, message, wParam,  IParam)  ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_BlanketErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_BlanketErrDlgDefault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  BLANKET  SYSTEM  ERROR  MESSAGE  BOX 


/************★********************************************************/ 
/**  error  box  that  appears  when  an  incorrect  password  is  entered  **/ 
/*************************************************************★*******/ 

II  ************************************************************** 

//  Modal  Dialog  Box:  PWERROR 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_PWErrDlgFunc (HWND  hWnd, UINT  message, WPARAM  wParam,  LP ARAM  IParam) 

{ 

return  BLD_PWErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_PWErrDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LP ARAM  IParam) 

{ 

WORD  wId; 
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switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_PWErrDlgDef ault (hDlg, message, wParam, iParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wid) 

{ 

case  IDOK: 

if  ( ! BLD_PWErrDlgDef ault (hDlg, message, wParam, iParam) ) 
EndDialog (hDlg, IDOK)  ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_PWErrDlgDef ault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_PWErrDlgDef ault (hDlg, message, wParam,  IParam) ; 
break; 

} 

break; 
default : 

return  BLD_PWErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} - • 
return  TRUE;//  Did  process  the  message 
} //END  OF  PASSWORD  ERROR  MESSAGE  BOX 


/*****★****************************************************************/ 

/**  error  message  that  appears  when  incorrect  year  is  entered  **/ 

/**********************************************************************/ 

j j ************************************************************** 

//  Modal  Dialog  Box:  YEAR_ERR 

j ! ************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_Year_ErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LP ARAM  IParam) 

{ 

return  BLD_Year_ErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_Year_ErrDlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LP ARAM  IParam) 

{ 

WORD  wId; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_Year_ErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wid) 
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{ 

case  IDOK: 

if  ( ! BLD_Year_ErrDlgDef ault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_Year_ErrDlgDef ault (hDlg, message,  wParam, IParam) ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_Year_ErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_Year_ErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  YEAR  ERROR  MESSAGE  BOX 


/***********★****************************************************/ 

/**  system  error  message  box  **/ 

/********************* ******************* ************************/ 

II  ************************************************************** 

//  Modal  Dialog  Box:  SYSERR 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_SysErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LP ARAM  IParam) 

{ 

return  BLD_SysErrDlgFuncDef (hWnd, (char  *)NULL); 

1 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_SysErrDlgP roc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_SysErrDlgDef ault (hDlg, message, wParam,  IParam)  ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

if  (!  BLD_SysErrDlgDef  ault  (hDlg, message,  wParam,  IParam)  ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_SysErrDlgDefault  (hDlg,  message,  wParam,  IParam)  ) 

EndDialog (hDlg, IDCANCEL) ; 
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break; 
default : 

return  BLD_SysErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_SysErrDlgDef ault (hDlg, message, wParam,  IParam)  ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  SYSTEM  ERROR  MESSAGE  BOX 


/**********************************************************★************/ 
/**  error  message  box  that  appears  when  blanket  files  can't  be  found  **/ 
/***********************************************************************/ 

II  ************************************************************** 

//  Modal  Dialog  Box:  BLANKERR 

II  ************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_BlankErrDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

return  BLD_BlankErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_BlankErrDlgP roc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_BlankErrDlgDef ault (hDlg,message, wParam,  IParam)  ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_BlankErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_BlankErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_BlankErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
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default : 

return  BLD_BlankErrDlgDef  ault  (hDlg, message,  wParaiti,  IParam)  ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  BLANKET  FILES  NOT  FOUND  MESSAGE  BOX 


/*********************************************************★******/ 

/**  error  message  that  appears  when  files  can't  be  found  **/ 

/****************************************************************/ 

II  ************************************************************** 

//  Modal  Dialog  Box:  MISSINGFILE 

II  ************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_MissingFileDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_MissingFileDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_MissingFileDlgProc (HWND  hDlg,UINT  message, WPARAM  wP a ram, LPARAM  IParam) 
{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_MissingFileDlgDef ault (hDlg, message,  wParam,  IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  ( !BLD_MissingFileDlgDef ault (hDlg, message, wParam, IParam)  ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD__MissingFileDlgDefault (hDlg, message,  wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_MissingFileDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_MissingFileDlgDef ault (hDlg, message,  wParam,  IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  MISSING  FILE  MESSAGE  BOX 
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//  appears  when  query*.txt  file  can  not  be  opened 

j j ************************************************************** 

//  Modal  Dialog  Box:  QUERYTXT 

J j ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_QueryTxtDlgFunc (HWND  hWnd, UINT  message, WP ARAM  wParam, LPARAM  iParam) 
{ 

return  BLD_QueryTxtDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_QueryTxtDlgProc (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 
{ 

WORD  wid; 

switch (message) 

{ 

case  V^_INITDIALOG: 

return  BLD_QueryTxtDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_QueryTxtDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK)  ; 
break; 

case  IDCANCEL: 

if  (! BLD_QueryTxtDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_QueiryTxtDlgDef ault (hDlg, message, wParam,  IParam)  ; 
break; 

} 

break; 
default : 

return  BLD_QueryTxtDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //End  of  query*. txt  file  can  not  be  open  message 


//  appears  when  local  error  file  can't  be  found 

II  ************************************************************** 

//  Modal  Dialog  Box:  ERRORFILE 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_ErrorFileDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 
{ 

return  BLD_ErrorFileDlgFuncDef (hWnd, (char  *)NULL); 

} 


// 


Modal  dialog  box  procedure 
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BOOL  CALLBACK  BLD_ErrorFileDlgProc (HWND  hDlg^UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_ErrorFileDlgDefault (hDlg, message, wParam,  IParam)  ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  (! BLD_ErrorFileDlgDefault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_ErrorFileDlgDef  ault  (hDlg,  message,  wParam,  IParam)  ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_ErrorFileDlgDefault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_ErrorFileDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //end  of  can't  find  local  error  file 


//  appears  when  null  ptrs  occur  during  WM_INITDIALOG 

II  ************************* ************** ******** *************** 

//  Modal  Dialog  Box:  NULLPTR 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_NULLPtrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LP ARAM  IParam) 

{ 

return  BLD_NULLPtrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_NULLPtrDlgP roc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_NULLPtrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND : 

wId=LOWORD (wParam) ; 
switch (wid) 
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{ 

case  IDOK: 

if  ( ! BLD_NULLPtrDlgDefault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_NULLPtrDlgDef ault (hDlg, message, wParam, IParam)  ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_NULLPtrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_NULLPtrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //end  of  nullptr 


//  appears  when  data  files  can't  be  opened  to  add  records  to  the  list  box 

II  ************************************************************** 

//  Modal  Dialog  Box:  DATAERR 

II  ■*;************************************************************* 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_DataErrDlgFunc (HWND  hWnd, UINT  message, WPARAM  wParam, LP ARAM  IParam) 

{ 

return  BLD_DataErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_DataErrDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_DataErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND : 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  (! BLD_DataErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK)  ; 
break; 

case  IDCANCEL: 

if  (! BLD_DataErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 
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default : 

return  BLD_DataErrDlgDefault (hDlg, message,  wParam,  IParam)  ; 
break; 

} 

break; 
default : 

return  BLD_DataErrDlgDefault (hDlg, message, wParam, IParam)  ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //end  of  dataerr 


//  appears  when  detail*.txt  can't  be  opened 

II  ************************************************************** 

//  Modal  Dialog  Box:  DETAILTXT 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_DFileErrDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_DFileErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_DFileErrDlgP roc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_DFileErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_DFileErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_DFileErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_DFileErrDlgDef ault (hDlg, message,  wParam,  IParam)  ; 
break; 

} 

break; 
default : 

return  BLD_DFileErrDlgDef ault (hDlg, message, wParam,  IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //end  of  can't  open  detail*. txt 
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/ / appears  when  result  of  add_matches  is  -1  indicating  no  more  matches  found 

II  *************************************************************** 

//  Modal  Dialog  Box:  NOMORE 

II  ******************* ********************************** ********* 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_NoMoreMatchesDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

return  BLD_NoMoreMatchesDlgFuncDef (hWnd, (char  *)NULL); 

} 


/ / Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_NoMoreMatchesDlgProc (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_NoMoreMatchesDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_NoMoreMatchesDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  (! BLD_NoMoreMatchesDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL)  ; 
break; 

default : 

return  BLD_NoMoreMatchesDlgDef ault (hDlg,message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_NoMoreMatchesDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //end  of  no  more  matches 


//  appears  when  incorrect  MRN  is  entered  during  browse  report 

II  ************************************************************** 

//  Modal  Dialog  Box:  MRNERR 

II  ************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_MRNErrDlgFunc (HWND  hWnd, UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_MRNErrDlgFuncDef (hWnd, (char  *)NULL); 

} 
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/ / Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_MRNErrDlgProc (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_MRNErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  { ! BLD_MRNErrDlgDef ault (hDlg,message,wParam, IParam) ) 

EndDialog (hDlg, IDOK)  ; 
break; 

case  IDCANCEL: 

if  ( !BLD_MRNErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_MRNErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_MRNErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} / /end  of  error  box  for  incorrect  MRN 


/ / appears  when  no  matches  are  returned  during  single  query 

II  ************************************************************** 

//  Modal  Dialog  Box:  NOMATCH 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_MatchErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LP ARAM  IParam) 

{ 

return  BLD_MatchErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_MatchErrDlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LP ARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_MatchErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 
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case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wid) 

{ 

case  IDOK: 

if  { ! BLD_MatchErrDlgDefault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  (! BLD_MatchErrDlgDefault (hDlg, message, wParam, iParam) ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_MatchErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_MatchErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 

} //end  of  error  box  with  message  of  no  matches  to  this  query 


//  appears  when  EIN  or  sequence  number  is  incorrect  during  print  report 

II  ************************************************************** 

//  Modal  Dialog  Box:  EINORSEQ 

! ! ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_EINorSeqErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_EINorSeqErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_EINorSeqErrDlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wId; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_EINorSeqErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wid) 

{ 

case  IDOK: 

if  (! BLD_EINorSeqErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 
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case  IDCANCEL: 

if  (! BLD_EINorSeqErrDlgDefault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_EINorSeqErrDlgDef ault (hDlg, message,  wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_EINorSeqErrDlgDef ault (hDlg, message,  wParam,  iParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 

} //end  of  incorrect  EIN  or  sequence  number  during  print  report 


/ / appears  when  sequence  number  is  incorrect  during  change  header  of  potential  blanket 

II  ************************************************************** 

//  Modal  Dialog  Box:  SEQERR 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_SeqErrDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_SeqErrDlgFuncDef  (hWnd,  (char  •'*)  NULL)  ; 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_SeqErrDlgP roc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_SeqErrDlgDef ault (hDlg, message, wParam,  IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_SeqErrDlgDef  ault  (hDlg, message,  wParam,  IParam)  ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( !BLD_SeqErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_SeqErrDlgDef ault (hDlg, message, wParam,  IParam) ; 
break; 

} 

break; 
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default : 

return  BLD_SeqErrDlgDef ault (hDlg, message, wParam, iParam)  ; 
break; 

} 

return  TRUE;//  Did  process  the  message 

} / /end  of  incorrect  sequence  number  during  change  header  or  potential  blanket 


//  appears  when  header*. txt  can't  be  opened  during  change  header 
11  ************************************************************** 

II  Modal  Dialog  Box:  HEADERTXT 

II  ************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_HFileDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_HFileDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_HFileDlgProc (HWND  hDlg,UINT  message, WPARAM  wP a ram, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_HFileDlgDe fault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_HFileDlgDef ault (hDlg, message, wParam,  IParam)  ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( !BLD_HFileDlgDef ault (hDlg, message, wParam, IParam)  ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_HFileDlgDef ault (hDlg, message, wParam, IParam)  ; 
break; 

} 

break; 
default : 

return  BLD_HFileDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 

} //end  of  header*. txt  can't  be  opened  during  change  header 
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//  appears  when  usernum.fil  can't  be  accessed 

II  ************************************************************** 

//  Modal  Dialog  Box:  USERERR 

II  ************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_UserNuinErrDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_UserNumErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_UserNumErrDlgProc (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_UserNiimErrDlgDefault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  (!  BLD_UserNumErrDlgDefault  (hDlg, message,  wParam,  IParam)  ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_UserNumErrDlgDef ault (hDlg,message, wParam, IParam)  ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_UserNumErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_UserNumErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //end  of  no  access  to  usernum.fil 


II  ************************************************************** 

II  Modal  Dialog  Box:  STATOPEN 

II  ************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_StatOpenDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_StatOpenDlgFuncDef (hWnd,  (char  *)NULL); 

} 
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//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_StatOpenDlgProc (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 
{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_StatOpenDlgDef ault (hDlg, message,  wParam,  IParam)  ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

if  (! BLD_StatOpenDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog(hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  (! BLD_StatOpenDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 
default : 

return  BLD_StatOpenDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 

default: 

return  BLD_StatOpenDlgDef ault (hDlg, message, wParam,  IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} 


II  ************************************************************** 

II  Modal  Dialog  Box:  STATEMPTY 

II  ************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_StatEmptyDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LP ARAM  IParam) 
{ 

return  BLD_StatEmptyDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_StatEmptyDlgProc (HWND  hDlg, UINT  message, WPARAM  wParam, LP ARAM  IParam) 
{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_StatEmptyDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COM“IAND : 

wId=LOWORD (wParam)  ; 
switch (wid) 

{ 

case  IDOK: 
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if  (! BLD_StatEmptyDlgDefault (hDlg, message, wParam, IParam)  ) 
EndDialog(hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_StatEmptyDlgDef ault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 
default : 

return  BLD_StatEmptyDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_StatEmptyDlgDef ault (hDlg, message,  wP a ram,  IParam)  ; 
break; 

} 

return  TRUE;//  Did  process  the  message 

} 


II  ************************************************************** 

//  Modal  Dialog  Box:  STATWOPEN 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_StatWOpenDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_StatWOpenDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_StatWOpenDlgP roc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_StatWOpenDlgDefault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_StatWOpenDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_StatWOpenDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 
default : 

return  BLD_StatWOpenDlgDefault (hDlg,message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_StatWOpenDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 
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} 

return  TRUE;//  Did  process  the  message 
} 

1 1 ************************************************************** 

//  Modal  Dialog  Box:  STATWRITE 

II  ************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_StatWriteErrDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  iParam) 
{ 

return  BLD_StatWriteErrDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_StatWriteErrDlgProc (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 
{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_StatWriteErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND : 

wId=LOWORD (wParam)  ; 
switch (wId) 

■ { 

case  IDOK: 

if  ( ! BLD_StatWriteErrDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  (! BLD_StatWriteErrDlgDef ault (hDlg, message, wParam, IParam)  ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 
default : 

return  BLD_StatWriteErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_StatWriteErrDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} 


inlt . c 
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/ /init . c 

//created  12/3/93  by  Laura  Downey,  Computer  Scientist,  NIST 
//utility  program  to  initialize  aggregate  statistics  structure 
//with  all  zeroes  and  to  write  the  structure  to  the  binary  file  stat#.fil 
//compiled  using  MSC  6.0  pwb 

//NOTE:  init.exe  needs  to  be  located  in  the  same  directory  as  stat#.fil 

#include  <stdio.h>  //standard  i/o 

#include  "struct. h"  //structure  definitions,  including  ex_stat 


struct  ex_stat  aggregate;  //by  globally  defining,  aggregate  is  initialized 

//to  all  zeroes 

main ( ) 

{ 

char  STATFILE [15] ; //holds  file  name  entered  by  user 

FILE  *sf;  //file  pointer  to  file  name  entered  by  user 


//clear  screen  and  prompt  user  to  enter  file  name 
system ("els") ; 

printf ("\n\nPLEASE  ENTER  THE  NAME  OF  THE  FILE  CONTAINING  THE  STATISTICS  ( stat# . f il ) \n\n" ) 
scanf("%s",  STATFILE); 


//write  aggregate  statistics  structure  containing  all  zeroes  to  statf.fil 
sf  = f open (STATFILE,  "wb") ; 
if  (sf  ==  NULL) 

printf ("\n\nUNABLE  TO  OPEN  %s\n",  STATFILE); 
else 
{ 

fwrite (Saggregate,  sizeof (struct  ex_stat) , 1,  sf ) ; 
f close  (sf ) ; 


} //END  OF  MAIN 
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print . c 

//  Filename:  PRINT. C 

//  "EAMAT42"  Generated  by  WindowsMAKER  Professional. 
//  Author:  Laura  L.  Downey 


finclude  "WINDOWS. H" 
finclude  "GENERIC. H" 


WMPDEBUG 

#include  "PRINT. WMC" 


/****************************************************************/ 
/*  Abort  Procedure  that  catches  printer  problems  */ 

/****************************************************************/ 
BOOL  FAR  PASCAL  AbortProc (HDC  hdc,  short  nCode) 

{ 

MSG  msg  ; 

while  (PeekMessage  (&msg,  NULL,  0,  0,  PM_REMOVE) ) 

{ 

TranslateMessage  (&msg)  ; 

DispatchMessage  (&msg) ; 

} 

return  TRUE  ; 

} //end  of  AbortProc 


/**************************************************************** 

/*  displays  "blanket  report  now  printing"  message  * 

/**************************************************************** 
j ! ************************************************************** 

II  Modal  Dialog  Box:  PBLANKET 

j j ************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_PrintBlanketDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_PrintBlanketDlgFuncDef (hWnd, (char  *)NULL); 

} 


/ 

/ 

/ 


/ / Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_PrintBlanketDlgProc (HWND  hDlg,UINT  message, WPARAM  wP a ram, LPARAM  IParam) 

{ 

char  PTitle[800];  /**  title  page  string  for  blanket  report  **/ 


FARPROC  IpfnAbortProc; 


//pointer  to  message  function  AbortProc 


HDC  hdc; 

int  height; 
int  index; 
int  perpage; 

RECT  rect; 

WORD  wid; 

switch (message) 

{ 


/**  device  context  to  printer  **/ 

/**  height  in  pixels  of  employee  detail  record  **/ 
/**  index  of  list  box  entry  **/ 

/**  # of  employee  records  printed  per  page  **/ 

/**  structure  defining  dimensions  of  employee 
record  in  pixels  for  printing  **/ 
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case  WM_INITDIALOG: 

return  BLD_PrintBlanketDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND : 

wId=LOWORD (wParam) ; 
switch (wid) 

{ 

case  IDOK: 

if  ( ! BLD_PrintBlanketDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCONT: 

rect.left  = 0; 
rect.top  = 500; 
rect. right  = 200; 
rect. bottom  = 700; 
hdc  = GetPrinterDC ( ) ; 

EnableWindow (hDlg,  FALSE);  //disable  window 
//start  abort  message  function  for  protection 

IpfnAbortProc  = MakeProcInstance  ( (FARPROC)  AbortProc,  hinst) ; 

Escape (hdc,  SETABORTPROC,  0,  (LPSTR)  IpfnAbortProc,  NULL) ; 

Escape (hdc, STARTDOC, strlen (PEDetailString) +1, (LPSTR) PEDetailString, 

(LPSTR) NULL) ; 

CreateTitlePage (PTitle) ; 

DrawText (hdc, (LPSTR) PTitle, -1, &rect,DT_NOCLIP  | DT_EXTERNALLEADING 
I DT_EXPANDTABS) ; 

Escape (hdc, NEWFRAME, 0,  OL,  OL) ; 

rect.left  = 0; 

rect . top  = 0 ; 

rect. right  = 0; 

rect. bottom  = 0; 

perpage=0; 

for(index=0;  index<=29;  index++) 

{ 

CopyBlanket_EDetail (index) ; 

CreateEDetail  () ; 

height  = DrawText (hdc, (LPSTR) PEDetailString, -1, &rect, DT_EXPANDTABS I 
DT_NOCLIP  I DT_EXTERNALLEADING  | DT_CALCRECT) ; 

DrawText (hdc, (LPSTR) PEDetailString, -1, Srect , DT_EXPANDTABS 1 
DT_NOCLIP  I DT_EXTERNALLEADING) ; 
rect.top  = rect.top  + height; 
perpage++; 
if  (perpage  > 2) 

{ 

Escape (hdc, NEWFRAME, 0,  OL,  OL) ; 
perpage  = 0; 
rect.top  = 0; 

} 

else 

{ 

height  = DrawText (hdc, (LPSTR) separatorstring, -1, &rect,DT_NOCLIP  1 
DT_EXTERNALLEADING  I DT_CALCRECT) ; 

DrawText (hdc, (LPSTR) separatorstring, -1 , Srect, DT_NOCLIP  I 
DT_EXTERNALLEADING) ; 
rect.top  = rect.top  + height; 

} 

} 

Escape (hdc, NEWFRAME, 0 , OL,  OL) ; 

Escape (hdc, ENDDOC, 0 , OL, OL) ; 


//finish  print  job 
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FreeProcInstance  (IpfnAbortProc) ; 
EnableWindow (hDlg,  TRUE) ; 
DeleteDC (hdc) ; 

EndDialog (hDlg,  IDCONT) ; 
break;  //end  of  IDCONT 


//free  abort  message  function 
//enable  current  dialog 
//delete  device  context 
//end  current  dialog 


case  IDCANCEL: 

if  (! BLD_PrintBlanketDlgDefault (hDlg, message, wParam,  IParam)  ) 
EndDialog(hDlg, IDCANCEL) ; 


break; 


default : 

return  BLD_PrintBlanketDlgDef ault (hDlg, message, wParam,  iParam) ; 
break; 

} 

break; 


default : 

return  BLD_PrintBlanketDlgDef ault (hDlg, message, wParam, IParam)  ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  BLANKET  REPORT  PRINTING  MESSAGE  DIALOG 


/********************************************★*******************/ 

/*  displays  "employee  detail  now  printing"  message  */ 

/*********************************************★******************/ 

II  ************* ******************************** ***************** 

//  Modal  Dialog  Box:  PEDETAIL 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_PrintEmpDetailDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_PrintEmpDetailDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_PrintEmpDetailDlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam 

) 


{ 

FARPROC  IpfnAbortProc; 

HDC  hdc; 

int  i ; 
int  nma; 

RECT  rect; 

WORD  wid; 


/**  pointer  to  message  function  AbortProc  **/ 
/**  device  context  to  printer  **/ 

/**  loop  counter  **/ 

/**  number  of  copies  to  be  printed  **/ 

/**  holds  dimensions  in  pixels  of 

employee  detail  to  be  printed  **/ 


switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_PrintEmpDetailDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 


case  WM_COMMAND : 

wId=LOWORD (wParam) ; 
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switch (wid) 

{ 

case  IDOK: 

if  ( ! BIiD_PrintEmpDetailDlgDefault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDOK) ; 
break; 


case  IDCONT: 

num  = atoi (cnum) ; 
rect.left  = 0; 
rect.top  = 20; 
rect. right  = 400; 
rect. bottom  = 1000; 
hdc  = GetPrinterDC ( ) ; 

EnableWindow (hDlg,  FALSE);  //disable  the  window 


//start  abort  message  function  for  protection 

IpfnAbortProc  = MakeProcInstance  ( (FARPROC)  AbortProc,  hinst) ; 
Escape (hdc,  SETABORTPROC,  0,  (LPSTR)  IpfnAbortProc,  NULL) ; 


Escape (hdc, STARTDOC, strlen (PrintEDetail) +1 , (LPSTR) PrintEDetail, 
(LPSTR) NULL) ; 
for(i  = 1;  i <=  nxim;  i++) 

{ 


DrawText (hdc, (LPSTR) PrintEDetail, -1 , Srect, DT_EXPANDTABS  I 
DT  NOCLIP  I DT  EXTERNALLEADING) ; 


Escape (hdc, NEWFRAME, 0,  OL,  OL) ; 

} 

Escape (hdc,ENDDOC, 0, OL, OL) ; 
FreeProcInstance  (IpfnAbortProc) ; 
EnableWindow (hDlg,  TRUE) ; 

DeleteDC (hdc) ; 

EndDialog (hDlg,  IDCONT); 
break; 


//finish  print  job 
//free  abort  message  function 
//enable  current  dialog 
//destroy  device  context 
//end  dialog 


case  IDCANCEL: 

if  ( ! BLD_PrintEmpDetailDlgDef ault (hDlg, message, wParam, IParam)  ) 
EndDialog (hDlg, IDCANCEL) ; 


break; 


default : 

return  BLD_PrintEmpDetailDlgDef ault (hDlg, message, wParam,  IParam) ; 
break; 

} 

break; 


default : 

return  BLD_PrintEmpDetailDlgDef ault (hDlg,message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  EMPLOYEE  DETAIL  PRINTING  MESSAGE  DIALOG 


/****************************************************************/ 
/*  displays  "header  detail  now  printing"  message  */ 

/****************************************************************/ 

II  ************************************************************** 

//  Modal  Dialog  Box:  PHDETAIL 

II  ******************************:*f******************************* 
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/ / Startup  procedure  for  modal  dialog  box 

int  BLD_PrintHeaderDetailDlgFunc (HWND  hWnd^UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_PrintHeaderDetailDlgFuncDef (hWnd, (char  *)NULL); 

} 


/ / Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_PrintHeaderDetailDlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IPa 
ram) 

{ 

FARPROC  IpfnAbortProc;  //pointer  to  message  function  AbortProc 


HDC  hdc; 

RECT  rect; 

WORD  wid; 


/**  device  context  to  printer  **/ 

/**  holds  dimensions  in  pixels  of 
header  detail  to  be  printed  **/ 


switch (message) 


case  WM_INITDIALOG: 

return  BLD_PrintHeaderDetailDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 


case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_PrintHeaderDetailDlgDef ault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDOK) ; 
break; 


case  IDCONT: 

CreateHDetailString ( ) ; 
rect. left  = 0; 
rect. top  = 20; 
rect. right  = 200; 
rect. bottom  = 200; 
hdc  = GetPrinterDC  ( ) ; 

EnableWindow (hDlg,  FALSE);  //disable  window 

/ /start  abort  message  function  for  protection 

IpfnAbortProc  = MakeProcInstance  ( (FARPROC)  AbortProc,  hinst) ; 
Escape (hdc,  SETABORTPROC,  0,  (LPSTR)  IpfnAbortProc,  NULL) ; 


Escape (hdc, STARTDOC, strlen (PHDetailString) +1 , (LPSTR) PHDetailString, 
(LPSTR) NULL) ; 

DrawText (hdc, (LPSTR) PHDetailString, -1, &rect, DT_EXPANDTABS  I 
DT_NOCLIP  1 DT_EXTERNALLEADING) ; 

Escape (hdc, NEWFRAME, 0,  OL,  OL) ; 

Escape (hdc, ENDDOC, 0 , OL, OL) ; 

FreeProcInstance  (IpfnAbortProc);  //free  abort  message  function 
EnableWindow (hDlg,  TRUE);  //enable  current  dialog 

DeleteDC (hdc) ; //destroy  device  context 

EndDialog (hDlg,  IDCONT);  //end  dialog 

break;  //end  of  IDCONT 


case  IDCANCEL: 

if  ( ! BLD_PrintHeaderDetailDlgDef ault (hDlg, message, wParam, IParam) ) 
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EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_PrintHeaderDetailDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_PrintHeaderDetailDlgDefault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  HEADER  DETAIL  PRINTING  MESSAGE  DIALOG 


/****************************************************************/ 

/*  displays  "report  now  printing"  message  */ 

/********************★*******************************************/ 

II  ************************************************************** 

II  Modal  Dialog  Box:  PINFO 

II  ************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_Function5DlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_Function5DlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_Function5DlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_Function5DlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

if  ( ! BLD_Function5DlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_Function5DlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_Function5DlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
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default : 

return  BLD_Function5DlgDef ault (hDlg, message, wParam,  iParam)  ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  REPORT  NOW  PRINTING  DIALOG 


/**********★*****★***********************************************/ 

/*  displays  "totals  now  printing"  message  */ 

/***************************★************************************/ 

II  ************************************************************** 

//  Modal  Dialog  Box:  PTOTALS 

! ! ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_TotNowPrintDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam,LPARAM  IParam) 

{ 

return  BLD_TotNowPrintDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_TotNowPrintDlgProc (HWND  hDlg,UINT  message, WP ARAM  wParam, LPARAM  IParam) 

{ 

FARPROC  IpfnAbortProc;  //pointer  to  message  function  AbortProc 

HDC  hdc;  /**  device  context  to  printer  **/ 

RECT  rect;  /**  holds  dimensions  in  pixels  of 

header  detail  to  be  printed  **/ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_TotNowPrintDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

if  ( !BLD_TotNowPrintDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCONT: 

rect. left  = 0; 
rect. top  = 200; 
rect . right  = 1000; 
rect. bottom  = 1500; 

CreatePrintTotString ( ) ; 
hdc  = GetPrinterDC ( ) ; 

EnableWindow (hDlg,  FALSE);  //disable  window 

//start  abort  message  function  for  protection 

IpfnAbortProc  = MakeProcInstance  ( (FARPROC)  AbortProc,  hinst) ; 

Escape (hdc,  SETABORTPROC,  0,  (LPSTR)  IpfnAbortProc,  NULL); 
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Escape (hdc, STARTDOC, strlen (PrintTotString) +1, (LPSTR) PrintTotString, 
(LPSTR)NULL) ; 

DrawText (hdc, (LPSTR) PrintTotString, -1, &rect, DT_NOCLIP  | 
DT_EXTERNALLEADING  | DT_EXPANDTABS) ; 

Escape (hdc, NEWFRAME, 0 , OL, OL) ; 

Escape (hdc, ENDDOC, 0, OL, OL) ; 


FreeProcInstance  (IpfnAbortProc) ; 
EnableWindow (hDlg,  TRUE) ; 

DeleteDC (hdc) ; 

EndDialog(hDlg,  IDCONT) ; 
break;  //end  of  IDCONT 


//free  abort  message  function 
//enable  current  dialog 
//destroy  device  context 
//end  dialog 


case  IDCANCEL: 

if  (! BLD_TotNowPrintDlgDefault (hDlg, message, wParam, IParam) ) 
EndDialog(hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_TotNowPrintDlgDef ault (hDlg, message, wParam, IParam)  ; 
break; 

} 

break; 
default : 

return  BLD_TotNowPrintDlgDefault (hDlg, message,  wParam,  IParam)  ; 
break; 

} 

return  TRUE;//  Did  process  the  message 
} //END  OF  REPORT  TOTALS  PRINTING  MESSAGE  DIALOG 


/***********************************★*****★**********************/ 

/*  prompts  user  to  enter  the  number  of  employee  details  to  print*/ 
/****************************************************************/ 

II  ************************************************************** 

II  Modal  Dialog  Box:  NCOPY 

! ! ************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_GetNumCopyDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_GetNumCopyDlgFuncDef (hWnd, (char  *)NULL); 

} 


/ / Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_GetNumCopyDlgP roc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

SetDlgltemText (hDlg, IDMF_NumCopies, "1") ; 

return  BLD_GetNumCopyDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 
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GetDlgltemText (hDlg, IDMF_NumCopies, cnum, 6) ; /**  get  N+1  char  **/ 

EndDialog (hDlg, IDOK) ; 

break; 

case  IDCANCEL: 

if  ( ! BLD_GetNiimCopyDlgDef ault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_GetNumCopyDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_GetNumCopyDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 

} //END  OF  "HOW  MANY"  EMPLOYEE  DETAILS  TO  PRINT  ENTRY  SCREEN 


/**  added  7/13/92  - function  to  create  device  context  for  printer  **/ 

/*******************  getprinterdc  ***********************************/ 

/**  this  function  gets  the  device  context  to  the  default  printer  **/ 
HDC  GetPrinterDC ( ) 

{ 

char  szPrinter  [80]  ; 

char  *szDevice,  *szDriver,  *szOutput; 

GetProfileString ("windows",  "device",  ",,,",  szPrinter,  80); 

if  ( (szDevice  = strtok (szPrinter,  ","))  && 

(szDriver  = strtok  (NULL,  ","))  && 

(szOutput  = strtok (NULL,  ","))) 

return  CreateDC (szDriver,  szDevice,  szOutput , NULL) ; 


return  0; 

} //END  OF  GETPRINTERDC 
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service . c 


//  Filename:  SERVICE. C 

//  "EAMAT42"  Generated  by  WindowsMAKER  Professional. 
//  Author:  Laura  L.  Downey 


// 

II  *********************************************************************** 

//  Code  in  this  file  is  initially  generated  by  WindowsMAKER  Professional. 
//  This  file  contains  functions  you  can  change 
//  to  provide  whatever  functionality  you  require. 

// 

//  All  actual  processing  are  done  in  the  .WMC  file.  To  override  that 
//  functionality  add  your  own  code  in  these  functions. 

// 

//  For  more  information, 

//  see  the  section  "How  code  is  generated"  in  the  documentation. 

// 

II  *********************************************************************** 

1 1 


#include  "WINDOWS. H" 
tinclude  "GENERIC. H" 

WMPDEBUG 

#include  "SERVICE .WMC" 


! ! ******************************************************** 

II  ERROR  MESSAGE  HANDLING 

! ! ******************************************************** 

int  BLDDisplayMessage (HWND  hWnd,UINT  uMsg, char  *pContext , int  iType) 

{ 

return  BLDDisplayMessageDef (hWnd, uMsg, pContext , iType)  ; 

} 


II  ************************************************************* 

II  FUNCTIONS  FOR  DRAWING  GRAPHIC  BUTTONS 

II  ************************************************************* 

BOOL  BLDBitmapToScreen (HDC  hDestDC,  char  *pBitmapName, 

int  X,int  Y,int  nWidth,int  nHeight, 

DWORD  dwRop,BOOL  bStretch) 

{ 

return  BLDBitmapToScreenDef (hDestDC, pBitmapName, X, Y, nWidth, nHeight , 

dwRop, bStretch) ; 


BOOL  BLDDrawIcon (LPDRAWITEMSTRUCT  IpDrawItem, char  *pIconName) 

{ 

return  BLDDrawIconDef (IpDrawItem, pIconName)  ; 

} 


BOOL  BLDDrawBitmap (LPDRAWITEMSTRUCT  IpDrawItem, char  *pBitmapName, BOOL  bStretch) 

{ 

return  BLDDrawBitmapDef (IpDrawItem, pBitmapName, bStretch) ; 

} 


BOOL  BLDDrawBkgndl con (HWND  hDlg, PAINTSTRUCT  *pPs,char  *pIconName, int  iCtrllD) 

{ 
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return  BLDDrawBJcgndIconDef (hDlg, pPs, pIconName/ iCtrllD) ; 

} 


BOOL  BLDDrawBkgndBitmap (HWND  hDlg, PAINTSTRUCT  *pPs,char  *pBitmapName, 

int  iCtrllD^BOOL  bStretch, BOOL  bCtrl) 

{ 

return  BLDDrawBkgndBitmapDef (hDlg,pPs,pBitmapNaine,iCtrlID,bStretch,bCtrl) ; 

} 


BOOL  BLDDrawAutoState (LPDRAWITEMSTRUCT  IpDrawItem, char  *szResource, BOOL  bBitmap, BOOL  bStre 
tch) 

{ 

return  BLDDrawAutoStateDef (IpDrawItem,  szResource,  bBitmap,  bStretch) ; 

} 


BOOL  BLDDrawStateBitmap (LPDRAWITEMSTRUCT  IpDrawItem, char  *szNorTnal, char  *szFocus, 

char  *szSelected, char  *szDisabled, BOOL  bStretch) 


{ 

return 

} 


BLDDrawStateBitmapDef (IpDrawItem, szNormal, szFocus, 
szSelected, szDisabied, bStretch) ; 


BOOL 


BLDDrawStatelcon (LPDRAWITEMSTRUCT  IpDrawItem, char  *szNonnal, char 
char  *szSelected, char  *szDisabled) 


return 

} 


BLDDrawStatelconDef (IpDrawItem, szNormal, szFocus, 
szSelected, szDisabied) ; 


*szFocus, 


BOOL  BLDDrawI tern (HWND  hDlg, LPDRAWITEMSTRUCT  IpDrawItem) 

{ 

return  BLDDrawItemDef (hDlg, IpDrawItem)  ; 

} 


/ j ************************************************************* 

//  FUNCTION  FOR  LOADING  BITMAP 

j j ************************************************************* 

HBITMAP  BLDLoadBitmap (HINSTANCE  hinstance, char  *pBitmapName) 

{ 

return  LoadBitmap (hinstance, (LPSTR) pBitmapName) ; 

} 

II  ************************************************************* 

//  FUNCTIONS  FOR  DIALOG  BOX  SCROLLING 

II  ************************************************************* 

void  BLDGetDlgScrolled (HWND  hDlg, int  *pxScrolled, int  *pyScrolled) 

{ 

BLDGetDlgScrolledDef (hDlg, pxScrolled, pyScrolled) ; 

} 


void  BLDSetDlgScrolled (HWND  hDlg,int  xScrolled, int  yScrolled) 

{ 

BLDSetDlgScrolledDef (hDlg, xScrolled, yScrolled) ; 

} 
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BOOL  BLDExitScrollDlg(HWND  hDlg) 

{ 

return  BLDExitScrollDlgDef (hDlg) ; 

} 


void  BIiDFindCtrlsRightBottom(HWND  hDlg,  int  *xRight,int  *yBottom) 

{ 

BLDFindCtrlsRightBottomDef (hDlg,xRight,yBottom) ; 

} 


void  BLDCalcScrollRanges (HWND  hDlg, int  *xRange,int  *yRange,int  xScrolled, 

int  yScrolled, int  iRightOf,int  iBelow) 

{ 

BLDCalcScrollRangesDef (hDlg, xRange, yRange, xScrolled, yScrolled, iRightOf , iBelow) 

} 


BOOL  BLDScrollDlg (HWND  hDlg,UINT  message, int  nScrlCode, int  nPos,int  iVertLine, 
int  iHorLine,int  iVertPage, int  iHorPage,int  iRightOf, 
int  iBelow, BOOL  binvalidate) 


{ 

return  BLDScrollDlgDef (hDlg,  message, nScrlCode, nPos, iVertLine, iHorLine, 
iVertPage, iHorPage, iRightOf, iBelow, binvalidate)  ; 


} 


II  *************************** ********************************** 

//  FUNCTION  FOR  CREATING  CONTROLS  IN  MAIN  WINDOW 

II  ************************************************************* 

HWND  BLDCreateClientControls (char  *pTemplateName, DLGPROC  IpNew) 

{ 

return  BLDCreateClientControlsDef (pTemplateName,  IpNew)  ; 

} 


void  BLDMoveWindow (HWND  hWnd, int  x, int  y,int  nWidth,int  nHeight,BOOL  bRepaint) 

{ 

BLDMoveWindowDef (hWnd,x,y,nWidth,nHeight, bRepaint) ; 

} 


void  BLDMoveDlgClient (HWND  ParenthWnd, HWND  hNew) 

{ 

BLDMoveDlgClientDef (ParenthWnd, hNew) ; 

} 


void  BLDSetClientFocus (HWND  hWnd) 

{ 

BLDSetClientFocusDef (hWnd) ; 

} 


void  BLDClientMove (HWND  hWnd) 

{ 

BLDClientMoveDef (hWnd) ; 

} 
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II  ************************************************************* 

//  FUNCTION  FOR  HANDLING  TOOLBARS  CONTROLS  IN  MAIN  WINDOW 

II  ************************************************************* 

HWND  BLDCreateClientDlg (char  *pTemplateName, HWND  ParenthWnd, UINT  message, 

DLGPROC  lpNew,int  Position, BOOL  bToMainWnd) 

{ 

return  BLDCreateClientDlgDef (pTemplateName, ParenthWnd, message, IpNew, Position, bToMainWn 

d)  ; 

} 


void  BLDCalcToolbarFrame (HWND  hWnd, int  *pxLeft,int  *pyTop,int  *pxRight,int  *pyBottom) 

{ 

BLDCalcToolbarFrameDef (hWnd, pxLeft , pyTop, pxRight , pyBottom) ; 

} 


LRESULT  BLDSizeToolBars (HWND  hWnd,UINT  message, int  nSizeType, int  nWidth,int  nHeight,BOOL  V 
erticalOnTop) 

{ 

return  BLDSizeToolBarsDef (hWnd, message, nSizeType, nWidth, nHeight, VerticalOnTop) ; 

} 


! ! ************************************************************* 

//  FUNCTION  SENDING  MDI  MESSAGES 

//  ************************************************************* 

BOOL  BLDSendMDIMessage (HWND  hWnd, UINT  message) 

{ 

return  BLDSendMDIMessageDef (hWnd, message) ; 

} 

II  ************************************************************* 

//  FUNCTION  EXPANDING  DIALOG  BOX 

II  ************************************************************* 

BOOL  BLDSizeDlg (HWND  hWnd, int  xRightOf,int  yBelow) 

{ 

return  BLDSizeDlgDef (hWnd, xRightOf, yBelow) ; 

} 

II  ************************************************************* 

//  FUNCTIONS  FOR  CONTROLS  FONT 

II  ************************************************************* 

BOOL  BLDInitCtrlFont (HWND  hDlg, int  iCtrlId,int  nHeight, int  nWidth,int  nEscapement, 

int  nOrientation, int  fnWeight , BYTE  fbitalic, BYTE  fbUnderline, 
BYTE  fbStrikeOut , BYTE  f bChar Set , BYTE  fbOutputPrecision, 

BYTE  fbClipPrecision, BYTE  fbQuality, BYTE  fbPitchAndFamily , 
char  *lpszFace) 

{ 

return  BLDInitCtrlFontDef (hDlg, iCtrlld, nHeight , nWidth,  nEscapement, 

nOrientation, fnWeight , fbitalic,  fbUnderline, 
fbStrikeOut,  fbCharSet, fbOutputPrecision, 
fbClipPrecision,  fbQuality, 
fbPitchAndFamily,  IpszFace) ; 

} 
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BOOL  BLDExitCtrlFont (HWND  hDlg, int  iCtrlld) 

{ 

return  BLDExitCtrlFontDef (hDlg, iCtrlld) ; 

} 


II  ************************************************************* 

//  FUNCTIONS  DIALOG  BOX  AND  CONTROLS  BACKGROUND 

II  ************************************************************* 

HBRUSH  BLDCtlColorBrushSetOrg(HWND  hWnd,HDC  hDC) 

{ 

return  BLDCtlColorBrushSetOrgDef (hWnd, hDC) ; 

} 


BOOL  BLDInitSolidBrush (HWND  hWnd, COLORREF  ColorRef) 

{ 

return  BLDInitSolidBru'shDef  (hWnd,  ColorRef ) ; 

} 


BOOL  BLDInitPatternBrush (HWND  hWnd, char  *pBitmapName) 

{ 

return  BLDInitPatternBrushDef (hWnd, pBitmapName) ; 

} 


BOOL  BLDExitBrush (HWND  hWnd) 

{ 

return  BLDExitBrushDef (hWnd) ; 

} 


HBRUSH  BLDCtlColorStockBrush (HWND  hWnd, int  fnObject) 

{ 

return  BLDCtlColorStockBrushDef (hWnd, fnObject) ; 

} 


HBRUSH  BLDCtlColorPropBrush (HWND  hWnd) 

{ 

return  BLDCtlColorPropBrushDef (hWnd) ; 

} 


HBRUSH  BLDCtlColorDef aultBrush (HWND  hWnd) 

{ 

return  BLDCtlColorDef aultBrushDef (hWnd) ; 

} 

II  ************************************************************* 

//  FUNCTIONS  FOR  HELP  HANDLING 

II  ************************************************************* 

BOOL  BLDCheckFlHelpKey (BOOL  bShift) 

{ 

return  BLDCheckFlHelpKeyDef (bShift) ; 

} 


void  BLDHelpTranslation (MSG  *pmsg) 
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{ 

BLDHelpTranslationDef (pmsg) ; 

} 


void  BLDShowHelp (HWND  hWnd^UINT  fuCommand, DWORD  dwData) 

{ 

BLDShowHelpDef (hWnd, fuCommand,  dwData)  ; 

} 


BOOL  BLDHelpFilter (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  lParam,DWORD  dwHelpId, 

LPARAM  *plRetval,BOOL  bFromDlg) 

{ 

return  BLDHelpFilterDef (hWnd, message, wParam, IParam, dwHelpId, plRetval, bFromDlg) ; 

} 


LRESULT  BLDDefWindowProcMsg(HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

return  BLDDefWindowProcMsgDef (hWnd, message, wParam, IParam) ; 

} 


II  ************************************************************* 

//  FUNCTIONS  FOR  HANDLING  OF 

//  MULTIPLE  INSTANCES  OF  TOOLBARS  AND 

//  CLIENT  AREA  CONTROLS 

II  ************************************************************* 


BOOL  BLDAddClientDlg(HWND  hDlg,DLGPROC  IpProc) 

{ 

return  BLDAddClientDlgDef (hDlg, IpProc) ; 

} 


BOOL  BLDRemoveClientDlg(HWND  hDlg) 

{ 

return  BLDRemoveClientDlgDef (hDlg) ; 

} 


BOOL  BLDIsClientDlgDialogMessage (MSG  *pMsg) 

{ 

return  BLDIsClientDlgDialogMessageDef (pMsg) ; 

} 


stat . c 


Wed  Mar  2 14:14:13  1994 


1 


//stat . c 

//created  12/2/93  by  Laura  L.  Downey,  NIST 
//holds  functions  to  initialize,  gather,  process, 

//and  store  application  performance  and  usability  statistics 


#include  <WINDOWS.H> 
#include  "GENERIC. H" 
#include  <fcntl.h> 
#include  <io-h> 


tdefine  YES  1 
#define  NO  0 

extern  struct  ex_stat  aggregate;  //explicitly  defined  in  usercode.c 

extern  struct  in_stat  current;  //explicitly  defined  in  usercode.c 


/*******************************  fill_aggregate  ***************************/ 
void  f ill_aggregate ( ) //fills  aggregate  structure  with  statistics 

{ 

//if  stop  time  exists  for  browse  report  selection  do  calculations 
if  (current . stop_browse  !=  0) 

{ 

aggregate -br_tot_time  = aggregate. br_tot_time  + current .bnet_time; 
aggregate . t ot_browse++ ; 

aggregate . avg_add_record  = (double) aggregate . tot_add_records'  / (double) aggregate . tot_br 
owse; 

aggregate . avg_br_time  = aggregate .br_tot_time  / (double) aggregate . tot_br owse; 

} 

//incomplete  single  query  case 

if  ( (current . St op_single  ==  0)  &&  (current . start_single  !=  0)  ) 

aggregate . tot_non_cases++; 
else  //complete  single  query  case 

if  ( (current . St op_single  !=  0)  &&  (current . start_single  !=  0)  ) 

{ 


switch  (current . outlier) 

{ 

case  YES:  //if  an  outlier 

aggregate . tot_outliers++; 
break; 

case  NO:  //if  not  an  outlier,  continue  calculations 

aggregate. tot_add_matches  = aggregate . tot_add_matches  + current . add_match; 
switch  (current . resolved) 

{ 

case  YES:  //if  resolved 

switch  ( current . interrupted) 

case  NO:  //not  interrupted 
//totals 

aggregate . rs_tot_time  = aggregate. rs_tot_time  + current . snet_time; 
aggregate . rq_tot_time  = aggregate . rq_tot_time  + current . qnet_time; 
aggregate . rtot_non_interrupt++; 

/ / averages 

if  (aggregate . rtot_non_interrupt  !=  0) 

{ 

aggregate . rs_avg_time  = 
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aggregate . rs_tot_time  / (double) aggregate . rtot_non_interrupt ; 
aggregate . rq_avg_time  = 

aggregate . rq_tot_time  / (double) aggregate . rtot_non_interrupt ; 

} 

break; 

case  YES : //interrupted 
//totals 

aggregate . rsi_tot_time  = aggregate . rsi_tot_time  + current.snet_time; 
aggregate . rqi_tot_time  = aggregate . rqi_tot_time  + current . qnet_time; 
aggregate . rtot_interrupt++; 

/ /averages 

if  (aggregate . rtot_interrupt  !=  0) ; 

{ 

aggregate . rsi_avg_time  = 

aggregate . rsi_tot_time  / (double) aggregate . rtot_interrupt ; 
aggregate . rqi_avg_time  = 

aggregate . rqi_tot_time  / (double) aggregate . rtot_interruot; 

} 

break; 

} //end  of  switch  current . interrupted 

//addt'l  matches  tally  for  resolved  cases 
switch  (current . add_match) 

{ 

case  0 : 

aggregate . rtot_add_matchO++; 
break; 
case  1 : 

aggregate . rtot_add_matchl++; 
aggregate . rtot_add_match++; 
break; 
case  2 : 

aggregate . rtot_add_match2++; 

aggregate . rtot_add_match  = aggregate . rtot_add_match  + current . add_match  ; 
break; 
case  3 : 

aggregate . rtot_add_match3++; 

aggregate . rtot_add_match  = aggregate . rtot_add_match  + current . add_match  ; 
break; 
default : 

aggregate . rtot_add_match4_plus++; 

aggregate . rtot_add_match  = aggregate . rtot_add_match  + current . add_match; 
break; 

}//end  of  switch  current . add_match 
break; 

case  NO:  //unresolved 

switch  (current . interrupted) 

{ 

case  NO:  //not  interrupted 
//totals 

aggregate . us_tot_time  = aggregate . us_tot_time  + current . snet_time; 
aggregate . uq_tot_time  = aggregate . uq_tot_time  + current . qnet_time ; 
aggregate . utot_non_interrupt++; 

/ / averages 

if  (aggregate . utot_non_interrupt  !=  0) ; 

{ 

aggregate . us_avg_time  = 

aggregate . us_tot_time  / (double) aggregate . utot_non_interrupt; 
aggregate . uq_avg_time  = 

aggregate . uq^tot_time  / (double) aggregate , utot_non_interrupt; 
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} 

break; 

case  YES : //interrupted 
//totals 

aggregate . usi_tot_time  = aggregate . us i_tot_time  + current.snet_time; 
aggregate . uqi_tot_time  = aggregate . uqi_tot_time  + current . qnet_tiine; 
aggregate . utot_interrupt++; 

/ /averages 

if  (aggregate . utot_interrupt  !=  0) 

{ 

aggregate . usi_avg_time  = 

aggregate . us i_tot_time  / (double) aggregate . utot_interrupt; 
aggregate . uqi_avg_time  = 

aggregate . uqi_tot_time  / (double) aggregate . utot_interrupt; 

} 

break; 

} //end  of  switch  current . interrupted 

//addt'l  matches  tally  for  unresolved  cases 
switch  (current . add_match) 

{ 

case  0 : 

aggregate . utot_add_matchO++; 
break; 
case  1 : 

aggregate- utot_add_mat chl++; 
aggregate . utot_add_match++; 
break; 
case  2 : 

aggregate . utot_add_match2++; 

aggregate . utot_add_match  = aggregate . utot_add_match  + current . add_match  ; 
break; 
case  3 : 

aggregate . utot_add_match3++; 

aggregate  - utot_add_match  = aggregate . utot_add_match  + current . add_match ; 
break; 
default : 

aggregate . utot_add_match4_plus++; 

aggregate . utot_add_match  = aggregate . utot_add_match  + current . add_match ; 
break; 

} //end  of  switch  current . add_match 
break; 

} //end  of  switch  on  current . resolved 


// 

//MORE  TOTALS 

// 

//total  resolved  cases 
aggregate . tot_resolved  = 

aggregate . rtot_non_interrupt  + aggregate . rtot_interrupt ; 

//total  unresolved  cases 
aggregate . tot_unresolved  = 

aggregate . utot_non_interrupt  + aggregate . utot_interrupt; 

//total  cases  without  interruptions 
aggregate . tot_non_interrupt  = 

aggregate . rtot_non_interrupt  + aggregate . utot_non_interrupt; 
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/ /total  cases  with  interruptions 
aggregate . tot_interrupt  = 

aggregate . rtot_interrupt  + aggregate . utot_interrupt; 

//total  cases 
aggregate . tot_cases  = 

aggregate . tot_resolved  + aggregate .tot_unresolved; 


// 

//MORE  AVERAGES 

// 

//average  # of  additional  matches  per  resolved  case 
if  {aggregate . tot_resolved  !=  0) 
aggregate . ravg_add_match  = 

(doiible) aggregate. rtot_add_match  / (double) aggregate . tot_resolved; 

//average  # of  additional  matches  per  unresolved  case 
if  (aggregate . tot_unresolved  !=  0) 
aggregate . uavg_add_match  = 

(double) aggregate . utot_add_match  / (double) aggregate . tot_unresolved; 

//average  # of  additional  matches  per  case 
if  (aggregate . tot_cases  !=  0) 
aggregate . avg_add_match  = 

(double) aggregate . tot_add_matches  / (double) aggregate. tot_cases; 


//PERCENTAGES 

// 

/ / resolved  cases 

// 

if  (aggregate . tot_resolved  !=  0) 

{ 

//%  0 addt'l  matches 
aggregate . rper_add_matchO  = 

( (double) aggregate . rtot_add_matchO  / (double) aggregate . tot_resolved)  * 100; 

//%  1 addt'l  match 
aggregate . rper_add_mat chi  = 

( (double) aggregate . rtot_add_matchl  / (double) aggregate. tot_resolved)  * 100; 

//%  2 addt'l  matches 
aggregate . rper_add_match2  = 

( (double) aggregate . rtot_add_match2  / (double) aggregate . tot_resolved)  * 100; 

//%  3 addt'l  matches 
aggregate . rper_add_match3  = 

( (double) aggregate . rtot_add_match3  / (double) aggregate. tot_resolved)  * 100; 

//%  4 or  more  addt'l  matches 
aggregate . rper_add_match4_plus  = 

( (doxible) aggregate . rtot_add_match4_plus  / (double) aggregate . tot_resolved)  * 10 

0; 

} 


// 

//  uresolved  cases 

// 
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if  (aggregate . tot_unresolved  !=  0) 

{ 

//%  0 addt'l  matches 
aggregate. uper_add_matchO  = 

( (double) aggregate . utot_add_matchO  / (double) aggregate. tot_unresolved)  * 100; 

//%  1 addt'l  match 
aggregate . uper_add_matchl  = 

( (double) aggregate . utot_add_matchl  / (double) aggregate . tot_unresolved)  * 100; 

//%  2 addt'l  matches 
aggregate . uper_add_match2  = 

( (double) aggregate. utot_add_match2  / (double) aggregate . tot_unresolved)  * 100; 

//%  3 addt'l  matches 
aggregate . uper_add_match3  = 

( (double) aggregate . utot_add_match3  / (double) aggregate . tot_unresolved)  * 100; 

//%  4 or  more  addt'l  matches 
aggregate . uper_add_match4_plus  = 

( (double) aggregate . utot  add  match4  plus  / (double) aggregate .tot  unresolved)  * 

100; 

} 

break; 

} //end  of  switch  on  current . outlier 
} //end  of  complete  single  query  case 

} //END  OF  FILL  AGGREGATE ( ) 


/*******************************  fill_current  ************ ****** *********/ 

void  f ill_current ( ) //calculates  current  times  and  assigns 

//outlier  status  if  appropriate 

#define  HALF_HOUR  1800  //number  of  seconds  in  a half  hour 

{ 

if  (current . St op_single  !=  0) 

{ 

current . snet_time  = dif f time (current . stop_single,  current.start_single); 
current .qnet_time  = difftime (current . stop_single,  current . start_qinfo) ; 
if  (current . snet_time  > HALF_HOUR) 
current . outlier  = YES; 

} 


if  (current . St op_browse  !=  0) 

current .bnet_time  = dif f time  (current . stop_browse,  current . start_browse) ; 
} //END  OF  FILL  CURRENT ( ) 


/*******************************  INIT_AGGREGATE  ***************************/ 

void  ini t_aggregate (hDlg, message, wParam, IParam)  //initializes  aggregate  ex_stat  structure 

//with  current  info  from  stat#.fil 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 


{ 
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char  c_usernuin[3]  ; 

char  STATFILE[14] ; 
FILE  *sf; 
int  nxoin; 


//user  number  converted  to  character  for  concatenation 
//in  file  name 

//stat# . f il 

//file  pointer  to  stat#.fil 
//was  anything  read  from  the  file 


//build  file  name  using  current  user  number 
strcpy (STATFILE,  "stat") ; 

strcat (STATFILE,  itoa (USER,  c_usernum,  10)  ); 

Strcat (STATFILE,  ".fil"); 


//read  last  set  of  aggregate  statistcs  and  report  any  errors 
sf  = fopen (STATFILE,  "rb"); 
if  (sf  ==  NULL) 

BLD_StatOpenDlgFunc (hDlg, message, wParam, iParam) ; 
else 
{ 

num  = f read (&aggregate,  sizeof (struct  ex_stat) , 1,  sf ) ; 
if  (n;xm  ==  0) 

BLD_StatEmptyDlgFunc (hDlg, message, wParam, iParam) ; 
f close (sf ) ; 

} 

} //END  OF  INIT  AGGREGATE  0 


/*******************************  INI T_CURRENT  ***************************/ 
void  init_current ( ) //initializes  current  in_stat  structure 

//with  all  zeroes 


{ 

current . interrupted  - 0; 
current . resolved  = 0; 
current . outlier  = 0; 

current . snet_time  = 0 ; 
current .qnet_time  = 0; 
current .bnet_time  = 0; 

current . add_match  = 0; 

current . start_single  =0; 
current . start_qinfo  = 0; 
current . stop_single  = 0; 

current . start_browse  = 0; 
current . stop_browse  = 0; 

} //END  OF  INIT  CURRENT  0 


/*******************************  WRITE_AGGREGATE  ***************************/ 

void  write_aggregate (hDlg, message, wParam, IParam)  //writes  aggregate  ex_stat  structure 

//with  current  info  to  stat#. fil 
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HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IP a ram; 

{ 

//user  number  converted  to  character  for  concatenation 
/ /in  file  name 

//stat# . fil 

//file  pointer  to  stat#. fil 
//was  anything  read  from  the  file 


char  c_usernum[3] ; 

char  STATFILE [14] ; 
FILE  *sf; 
int  num; 


//build  file  name  using  current  user  number 
strcpy (STATFILE,  "stat") ; 

St rcat (STATFILE,  itoa (USER,  c_usernum,  10)  ); 
strcat (STATFILE,  ".fil"); 


//read  last  set  of  aggregate  statistcs  and  report  any  errors 
sf  = fopen (STATFILE,  "wb") ; 
if  (sf  ==  NULL) 

BLD_StatWOpenDlgFunc (hDlg, message, wParam,  iParam)  ; 
else 
{ 

num  = fwrite (Saggregate,  sizeof  (struct  ex_stat) , 1,  sf>; 
if  (num  ==  0) 

BLD_StatWriteErrDlgFunc (hDlg, message, wParam,  IParam) ; 
fclose  (sf ) ; 

} 


} //END  OF  WRITE  AGGREGATE ( ) 
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/**  November  22,  1993  */ 
/**  Version  4.2  */ 
/*Filename:  USERCODE.C  */ 
/*"EAMATE"  Generated  by  WindowsMAKER  Professional  */ 
/*Author:  Laura  L.  Downey  */ 


/**  11/15/93  - all  changes,  updates,  suggestions  incorporated  **/ 
/**  usercode.c  is  ready  for  use  **/ 
/**  only  remaining  code  to  be  implemented  is  statistic  collection  **/ 

//  11/22/93  - statistics  code  added 


//  2/4/94  - RPC  numbers  changed,  error  codes  adjusted,  & file  names  adjusted 


/**  include  files  **/ 

♦include  <WINDOWS.H>  /** 

♦include  "GENERIC. H"  /** 

♦include  <fcntl.h> 

♦include  <io.h> 

♦include  "USERCODE . WMC" 

♦include  "global. h"  /** 

♦include  <c: \ptk40\include\rpc\rpc.h>  /** 

/ 

♦include  "p_prot.h"  /** 

♦include  "p_clnt.h"  /** 

♦include  "tklib.h"  /** 

/**  local  file  definitions  **/ 

♦define  EFILE  "err.fil"  /** 

♦define  UFILE  "usern\am.  fil"  /** 

/**  misc.  definitions  including 
rpc  definitions  **/ 

♦define  ADD_MATCHES  0x37000000  /** 

♦define  BROWSE_REPORT  0x35000000  /** 

♦define  DEF_SEQ_NO  "AAA"  /** 

/ 

♦define  GET_BLANKET  0x32000000  /** 

♦define  GET_EMP.L_DETAIL  0x34000000  /** 

♦define  GET_HEADER  0x30000000  /** 

♦define  GET_SEQ_HEADER  0x36000000  /** 

*/ 

♦define  HOST  "demeter"  /** 

♦define  MAXBRLB  100  /** 

♦define  MAXB  30  /** 

♦define  MAXQLB  100  /** 

♦define  PASSWORD  "scout"  /** 

♦define  PRINT_REPORT  0x33000000  /** 

♦define  PROCNUM  1 /** 

♦define  RETRY_TIME  30  /** 

♦define  TOT_TIME  30  /** 

♦define  SINGLE_QUERY  0x31000000  /** 

♦define  UDP  "udp"  /** 

♦define  VERSNUM  1 /** 


windows  header  file  **/ 

master  header  file  for  the  application  **/ 


includes  global  variables  **/ 

added  1/5/93  by  LLD  per  PC-NFS  instructions  * 

per  PC-NFS  **/ 
per  PC-NFS  **/ 
per  PC-NFS  **/ 

error  file  for  rpc  errors  **/ 
user  number  stored  here  **/ 


additional  matches  identifier  for  rpc  call  ** 
browse  report  identifier  for  rpc  call  **/ 
defalut  sequence  n;jmber  for  employer  report  * 

blanket  info  identifier  for  rpc  call  **/ 
employee  detail  identifier  for  rpc  call  **/ 
all  header  info  identifier  for  rpc  call**/ 
specific  header  info  identifier  for  rpc  call 

server  name  **/ 

max  increment  of  records  to  be  added  to 
browse  list  box  **/ 

max  number  of  records  for  blanket  listbox  **/ 
max  increment  of  records  to  be  added  to 
query  list  box  **/ 

password  for  printing  full  report  **/ 
print  report  info  identifier  for  rpc  call  **/ 
procedure  number  of  rpc  call  **/ 
retry  timeout  for  rpc  calls  **/ 
total  timeout  for  rpc  calls  **/ 
single-query  info  identifier  for  rpc  call  **/ 
protocol  used  with  creating  client  handle  **/ 
version  number  of  rpc  call  **/ 


struct  ex_stat  aggregate; 
struct  in  stat  current; 


//statistics  structure 
//statistics  structure 
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//USER  ENTRY  SCREENS  AND  DISPLAY  INFORMATION  SCREENS 


/************************************************************* **********************/ 
/*  displays  main  window  of  application  */ 

/*****************★********************************************★********************/ 


HWND  BLD_MAINClFunc (hWnd, message, wParam, IParam)  /*  Startup  procedure  for  window  in  client 
area  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  iParam; 

{ 

HWND  hNew; 

FARPROC  IpNew; 

IpNew  = MakeProcInstance (BLD_MAINClProc, hinst) ; 
if  (! (hNew  = BLDCreateClientControls ( "MAIN" , IpNew) ) ) 

{ 

FreeProcInstance (IpNew) ; 

BLDDisplayMessage (hWnd, BLD_CannotCreate, "MAIN", 

MB_OK  I MB_ICONHAND) ; 

} 

return  hNew; 

} 

/*Procedure  for  window  in  client  area  */ 

BOOL  FAR  PASCAL  BLD_MAINClProc (hDlg,  message,  wParam,  IParam) 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_MAINDlgDef ault (hDlg, message, wParam,  IParam)  ; 
break; 


case  WM_NCDESTROY: 

FreeProcInstance (IpClient)  ; 

hClient  = 0; 

break; 


case  WM_COMMAND: 
switch (wParam) 

{ 

case  IDOK: 

return  BLD_MAINDlgDef  ault  (hDlg,  message,  wParam,  IParam)  ; 
break; 


case  IDCANCEL: 

return  BLD_MAINDlgDef  ault  (hDlg, message,  wParam,  IParam)  ; 
break; 


default : 
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return  BLD_MAINDlgDef ault (hDlg, message, wParam,  IParam)  ; 
break; 

} 

break; 


default : 

return  BLD_MAINDlgDef ault (hDlg, message, wParam,  iParam)  ; 
break; 


} 

return  TRUE;  /*  Processed  the  message  */ 
} //END  OF  DISPLAY  MAIN  WINDOW 


/*************************************************************************************/ 

/*  displays  credits  in  main  window  */ 

/**********************************************★★*************************************/ 

int  BLD_FunctionDlgFunc (hWnd, message, wParam, iParam)  /*  Startup  procedure  for  modal  dialog 
box  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance (BLD_FunctionDlgProc, hinst ) ; 

ReturnValue  = DialogBox (hinst , ■ (LPSTR) "MAINl",  hWnd,  IpProc); 

FreeProcInstance (IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, "MAINl", 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 

BOOL  FAR  PASCAL  BLD  FunctionDlgProc (hDlg,  message,  wParam,  IParam)  /*  Modal  dialog  box  pr< 
cedure  */ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FILE  *uf; 
int  num; 


//file  pointer  to  usernum.fil 

//data  check  for  usernum.fil,  was  anything  read  from  the  file 


switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_FunctionDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

switch (wParam) 

{ 

case  ID_CONT: 

EndDialog (hDlg, ID_CONT) ; 
uf  = fopen(UFILE,  "rb") ; 
if  (uf  ==  NULL) 
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BLD_UserNuinErrDlgFunc (hDlg, message, wParam, IParam) ; 
else 
{ 

num  = fscanf(uf,  "%i",  &USER) ; 
if  (num  ==  0) 

BLD_UserNumErrDlgFunc (hDlg, message, wParam, IParam) ; 
f close (uf ) ; 

} 

//initialize  aggregate  statistic  structure 
init_aggregate (hDlg, message, wParam, IParam) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_FunctionDlgDef ault (hDlg, message, wParam, IParam) ) 
EndDialog(hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_FunctionDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_FunctionDlgDef  ault  (hDlg, message,  wParam,  IParam)  ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  DISPLAY  CREDITS  IN  MAIN  WINDOW 


/***************************************************************************************** 

***/ 

/*  prompts  user  to  enter  search  info  for  a particular  employee 
*/ 

/***************************************************************************************** 

***/ 

int  BLD_QUERYDlgFunc (hWnd, message, wParam,  IParam)  /*  Startup  procedure  for  modal  dialog  box 
*/ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance (BLD_QUERYDlgProc, hinst ) ; 

ReturnValue  = DialogBox (hinst , (LPSTR) "QUERY",  hWnd,  IpProc); 

FreeProcInstance (IpProc)  ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, "QUERY", 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 

BOOL  FAR  PASCAL  BLD_QUERYDlgProc (hDlg,  message,  wParam,  IParam)  /*  Modal  dialog  box  proced 
ure  * / 


usercode . c 


Wed  Mar  2 14:14:17  1994 


5 


HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IP  a ram; 

{ 

char  BRFILE[14], 
DFILE [14] , 
HFILE[14] , 
QFILE[13] ; 

char  c usernum[3] 


CLIENT  _TKFAR  *clnt; 

FILE  *hfil, *brfil; 

FILE  *qf,  *ef; 

HCURSOR  hCur; 

HWND  hEIN; 

HWND  hLName; 

HWND  hYear; 

int  srpcres,  sres,  cres; 
int  usernum,  hrpcres,  hres; 


/ /browse  file 
//detail  file 
/ /header  file 
//query  file 

/ /user  number  converted  to  character  for  concatenation 
//in  file  name 

/**  handle  to  client  **/ 

/**  pointers  to  server  data  files  **/ 

/**  pointer  to  query  file  and  error  file  **/ 

/**  cursor  handle  **/ 

/**  handle  to  IDMF_QEIN  **/ 

/**  handle  to  IDMF_LName  **/ 

/**  handle  to  IDMF  QYear  **/ 


/** 
/ * * 


rpc  call  result,  single  query  call  result, 
and  clnt_control  result  **/ 

user  number,  rpc  call  result,  and  header  call  result 


ery 


struct  query  hquery,  squery;/**  structure  to  hold  header  query  parameters,  & single  qu 

parameters  **/ 

struct  timeval  timeout;  /**  timevalue  structure  for  clnt  control  **/ 


//build  file  names  using  current  user  number 
strcpy (BRFILE,  "d:brow") ; 

strcat (BRFILE,  itoa (USER,  c_usernum,  10)  ); 

strcat (BRFILE,  ".txt\0"); 


strcpy (DFILE,  "d:detl"); 

strcat (DFILE,  itoa (USER,  c_usernum,  10)  ); 

strcat (DFILE,  ".txt\0"); 

strcpy  (HFILE,  ”d:hdr''); 

strcat  (HFILE,  itoa  (USER,  c_usern;im,  10)  ); 

strcat (HFILE,  ".txt\0"); 


strcpy (QFILE,  "d:query"); 

strcat (QFILE,  itoa (USER,  c_usernum,  10)  ); 
strcat (QFILE,  ".txt\0"); 


switch (message) 

{ 

case  WM_INITDIALOG: 

//initialize  current  statistic  structure 
init_current () ; 

//record  statistics 

current . start_single  = time (NULL) ; //store  start  single  query  time 
aggregate . tot_single_query++;  //increment  # of  single  query  operations  c 
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hosen 


return  BLD_QUERYDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 


* * / 


case  WM_COMMAND: 
switch (wParam) 
{ 


case  IDOK:  /**  get  info  entered  by  user  **/ 

QYear[0]  = 0; 

QEIN[0]  = 0; 

QEstab[0]  = 0; 

LName [ 0 ] = 0 ; 

FName [ 0 ] = 0 ; 

QSSN[0]  = 0; 


GetDlgltemText (hDlg, IDMF_QYear, (LPSTR) QYear, 5) ; /**  get  N+1  characters  **/ 

GetDlgltemText (hDlg, IDMF_QEIN, (LPSTR) QEIN, 11) ; 

GetDlgltemText (hDlg, IDMF_QEstab, (LPSTR) QEstab, 5) ; 

GetDlgltemText (hDlg, IDMF_LName, (LPSTR) LName, 16) ; 

GetDlgltemText (hDlg, IDMF_FName, (LPSTR) FName, 13) ; 

GetDlgltemText (hDlg, IDMF_QSSN, (LPSTR) QSSN, 12) ; 

if  (strcmp (QYear,  "1991")  !=  0)  /**  validate  the  year  field 

{ 

BLD_Year_ErrDlgFunc (hDlg, message, wParam, IParam) ; 
hYear  = GetDlgItem(hDlg, IDMF_QYear) ; 

SetFocus (hYear) ; 

} 

else  / /year  OK,  check  name  if  entered 

{ 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourglass 

ShowCursor  (TRUE) ; //show  hourglass 

if  (( (strlen (LName)  ==  0)  &&  (strlen (FName)  !=  0))  ||  ( (strlen (LName)  !=  0) 

( St rlen (FName)  ==  0))) 

{ 

/**  if  a name  is  entered,  both  first  and  last  name  must  be  entered  **/ 
BLD_NMSGDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLName  = GetDlgItem(hDlg, IDMF_LName) ; 

SetFocus (hLName) ; 

} 

else  //name  OK,  check  SSN  if  entered 

if  ( (strlen (LName)  ==  0)  &&  (strlen (QSSN)  < 11)) 

{ 

/**  either  both  first  and  last  name  must  be  entered  or  SSN  **/ 

BLD_QueryMessageDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLName  = GetDlgItem(hDlg, IDMF_LName) ; 

SetFocus (hLName) ; 

} 

else  //year,  name,  SSN  OK,  send  header  query  info  to  server 

{ 

usernum  = USER; 

/**  send  the  header  query  info  to  a file  and  let  the  server  know  **/ 
qf  = fopen(QFILE,  "wb") ; 
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/ 


) ; 


1")  ; 


if  (qf  ==  NULL)  / /if  file  not  available  drop  out  of  all  if-else 

BLD_QueryTxtDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  file  available  continue 

{ 

strcpy (hquery - Year,  QYear); 
strcpy (hquery . EIN,  QEIN); 
strcpy  {hc[uery  .Estab,  QEstab)  ; 
strcpy (hquery . seq_no,  DEF_SEQ_NO) ; 
hquery . FName [0]  = 0; 
hquery . LName [ 0 ] = 0; 
hquery , SSN[0]  = 0; 
hquery. offset [0]  = 0; 

f write (&hquery,  sizeof (struct  query),  1,  qf ) ; 
fclose (qf ) ; 


/**  clnt_create  is  one  step  down  from  a straight  rpc  call 

it  is  required  here  for  control  of  the  time  out  value  **/ 
clnt  = clnt_create  (HOST,  GET_SEQ_HEADER,  VERSNUM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg,message,wParam,  IParam)  ; 
else  //if  error  file  available  continue 

{ 

fprintf  (ef , "\n%s\n",  "Single  Query,  Get  Seq  Header,  clnt_create" ) 


fprintf(ef,  "%s\n",  "CLIENT  HANDLE  IS  NULL") ; 
fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n",  t_errno) ; 
fclose (ef); 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hYear  = GetDlgltem (hDlg, IDMF_QYear) ; 

SetFocus (hYear) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  clnt  = NULL 

else  /**  set  re-try  timeout  value  for  employer  header  request** 


{ 

timeout . tv_sec  = RETRY_TIME; 
timeout . tv_usec  = 0; 

cres  = clnt_control (clnt,CLSET_RETRY_TIMEOUT, (char  _TKFAR  *)&timeout 

if  (cres  ==  0) 

{ 

ef  = fopen(EFILE,  "a"); 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 
{ 

fprintf (ef,  "\n%s\n",  "Single  Query,  Get  Seq  Header,  clnt_contro 

fprintf (ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET"); 
fclose  (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE);  //hide  hourglass 
SetCursor  (hCur) ; //reset  to  arrow 

hYear  = GetDlgltem (hDlg, IDMF_QYear) ; 

SetFocus (hYear) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  cres  = 0 

else  /**  set  total  timeout  & request  employer  header  info  **/ 
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) ; 


It 


) ; 


* * / 


■k-k  ! 


{ 

timeout . tv_sec  = TOT_TIME; 
timeout . tv_usec  = 0; 

hrpcres  = clnt_call (clnt, PROCNUM, (xdrproc_t) xdr_int , 

{caddr_t ) &usernum,  (xdrproc_t)  xdr_int , (caddr_t ) &hres,  timeout 

clnt_destroy (clnt) ; 

if  ((hrpcres  !=  0)  II  (hres  !=  1))  /**  check  for  errors  **/ 

{ 

ef  = fopen(EFILE,  "a"); 
if  (ef  ==  NULL) 

BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else 
{ 

fprintf (ef , "\n%s\n",  "Single  Query,  Get  Seq  Header,  clnt_call 

fprintf (ef , "HRPCRES  = %d\n",  hrpcres  ); 
fprintf (ef,  "HRES  = %d\n",  hres) ; 
if  (hrpcres  !=  0)  /**  if  rpc  call  failed  **/ 

{ 

/**  rpc_createrr  is  a global  variable  returned  by  rpc_call 
and  relates  the  status  of  the  call  itself  **/ 

/**  t_errno  further  delineates  the  error  in  certain  settings 

fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n\n",  t_errno) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hYear  = GetDlgItem(hDlg, IDMF_QYear) ; 

SetFocus (hYear) ; 

} 

else  /**  if  EIN  could  not  be  found  **/ 

{ 

fprintf (ef,  "%s\n\n",  "SEARCH  ENGINE  COULD  NOT  FIND  EIN"); 
BLD_EINErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hEIN  = GetDlgItem(hDlg, IDMF_QEIN) ; 

SetFocus (hEIN) ; 

} 

fclose (ef ) ; 

} //end  of  ef  !=  NULL 

}//end  of  error  check  (if  errors,  drop  out  of  all  if-else) 
else  //EIN  verified,  send  single  query  info 

{ 

/**  send  the  single-query  info  to  a file  and  let  the  server  know 
qf  = fopen(QFILE,  "wb") ; 

if  (qf  ==  NULL)  //if  file  not  available  drop  out  of  all  if~elese 
BLD_QueryTxtDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  file  available,  continue 

{ 

strcpy (squery . Year,  QYear) ; 
strcpy (squery . EIN,  QEIN) ; 
strcpy (squery .Estab,  QEstab) ; 
squery . seq_no [0]  = 0; 
strcpy (squery . FName,  FName) ; 
strcpy (squery . LName,  LName) ; 
strcpy (squery , SSN,  QSSN) ; 
squery . of f set [0]  = 0; 

f write (& squery,  sizeof (struct  query),  1,  qf ) ; 
fclose (qf ) ; 
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eate") ; 


& timeout) ; 


ontrol") ; 


esr  timeout) ; 


/**  clnt_create  is  one  step  down  from  a straight  rpc  call 

it  is  required  here  for  control  of  the  time  out  value  **/ 
clnt  = clnt_create (HOST,  SINGLE_QUERY,  VERSNUM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a")  ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, iParam) ; 
else  //if  error  file  available  continue 

{ 

fprintf (ef , ”\n%s\n",  "Single  Query,  Single  Query,  clnt_cr 


fprintf(ef,  "%s\n",  "CLIENT  HANDLE  IS  NULL") ; 
fprintf  (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n",  t_errno) ; 
f close (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 
ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hYear  = GetDlgltem (hDlg, IDMF_QYear ) ; 

SetFocus (hYear) ; 

} //end  of  ef  !=  NULL 
}//end  of  if  clnt  = NULL 

else  /**  set  re-try  timeout  value  **/ 

{ 

timeout . tv_sec  = RETRY_TIME; 
timeout . tv_usec  = 0; 

cres  = clnt_control (clnt,CLSET_RETRY_TIMEOUT, (char  _TKFAR  *) 


if  (cres  ==  0) 


ef  = fopen(EFILE,  "a")  ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 
{ 

fprintf (ef,  "\n%s\n",  "Single  Query,  Single  Query,  clnt_c 

fprintf (ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET"); 
fclose(ef); 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 
ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hYear  = GetDlgltem (hDlg, IDMF_QYear) ; 

SetFocus (hYear) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  cres  = 0 

else  /**  set  total  timeout  & request  search  **/ 

{ 

timeout . tv_sec  = TOT_TIME; 
timeout . tv_usec  = 0 ; 

srpcres  = clnt_call (clnt, PROCNUM,  (xdrproc_t ) xdr_int , 

(caddr_t) &usernum, (xdrproc_t) xdr_int,  (caddr_t) &sr 

clnt_destroy (clnt ) ; 

if  ((srpcres  !=  0)  II  (sres  !=  1)) 

( 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 
{ 

if  (srpcres  !=  0) 

{ 
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Int  call"); 


clnt  call") ; 


fprintf (ef , "\n%s\n",  "Single  Query,  Single  Query, 


fprintf(ef,  "%d  = SRPCRESXn",  srpcres  ); 
fprintf(ef,  "%d  = SRES\n\n",  sres) ; 
fprintf (ef , "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf(ef,  "%d  = T_ERRNO\n",  t_errno) ; 
BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam)  ; 
ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 
hYear  = GetDlgItem(hDlg, IDMF_QYear) ; 

SetFocus (hYear) ; 


} 

else 

{ 

fprintf (ef , 


'\n\n%s\n",  "Single  Query,  Single  Query 


fprintf (ef,  "NO  MATCHES  TO  THIS  QUERY\n\n"); 
BLD_MatchErrDlgFunc (hDlg, message, wParam, IParam) ; 
ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hYear  = GetDlgItem(hDlg, ID^^_QYear) ; 

SetFocus (hYear) ; 


} 

f close (ef ) ; 

} //end  of  ef  !=  NULL 
} //end  of  error  check  on  srpcres  and  sres 
else  //parameters,  communications  & data  verified 
{ //build  next  window  if  files  available 


/ /hide  hourglass 
//reset  to  arrow 


ShowCursor  (FALSE) ; 

SetCursor  (hCur) ; 

EndDialog (hDlg, IDOK) ; 
brfil  = fopen (BRFILE,  "rb") 
hfil  = fopen(HFILE,  "rb") ; 
if  ( (hfil  ==  NULL)  I I (brfil  ==  NULL) ) 

BLD_MissingFileDlgFunc (hDlg, message, wParam, IParam)  ; 
else  //file  available,  build  next  window 


//check  file  ptrs  before 
//opening  QINFO 


{ 

fclose (hfil) ; 
fclose  (brfil) ; 

BLD_OKDlgFunc (hDlg, message, wParam, IParam) ; • 

} 

} / /everything  executed  properly 
} / /end  of  set  total  timeout  value  and  request  search 
} //end  of  set  re-try  timeout  value  for  single  query 
} //end  of  send  single-query  info  if  qf  !=  NULL 
} //end  of  EIN  verified,  send  single-query  info 
} //end  of  set  total  timeout  value  for  get  employer  header 
} //end  of  set  re-try  timeout  value  for  employer  header  request 
} //end  of  send  header  query  info  if  qf  !=  NULL 
} //end  of  send  header  query  info 
} //end  of  check  name  if  entered 
break;  //end  of  IDOK 


case  IDCANCEL: 

f ill_aggregate ( ) ; 

write_aggregate  (hDlg, message,  wParam,  IParam)  ; 
if  ( ! BLD_QUERYDlgDef  ault  (hDlg, message,  wParam,  IParam)  ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 
default : 

return  BLD_QUERYDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
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default : 

return  BLD__QUERYDlgDef ault (hDlg, message, wParam,  iParam) ; 
break; 


} 

return  TRUE;/*  Did  process  the  message  */ 
} //END  OF  SINGLE  QUERY  ENTRY  SCREEN 


/**************************************************************************************■*** 
* * * * / 

/*  displays  matches  to  user  single  query 
*/ 

/***************************************************************************************** 
* * * * / 

int  BLD__OKDlgFunc (hWnd,  message, wParam,  iParam)  /*  Startup  procedure  for  modal  dialog  box  */ 
HWND  hWnd; 

UINT  message; 

WPARMd  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance (BLD_0PU3lgProc, hinst ) ; 

ReturnValue  - DialogBox (hinst , (LPSTR) "QINFO" , MainhWnd,  IpProc); 

FreeProcInstance (IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, "QINFO", 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 

BOOL  FAR  PASCAL  BLD_OKDlgProc (hDlg,  message,  wParam,  IParam)  /*  Modal  dialog  box  procedure 
*/ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

char  BLFILE [16]  , 

BRFILE [14]  , 

DFILE[14]  , 

HFILE[14]  , 

QFILE[13] ; 

char  c_usernum[3] ; 


char  ListBoxString [200] ; 
char  recoff set  [30] ; 

CLIENT  __TKFAR  *clnt; 

FILE  *dfil,  *brfil,  *hfil; 
FILE  *qf,  *ef; 

HCURSOR  hCur; 

HWND  hBl; 

HWND  hLB; 


/ /blanket  file 
//browse  file 
//detail  file 
//header  file 
//query  file 

//user  number  converted  to 
//character  for  concatenation 
//in  file  name 

/**  list  box  string  **/ 

/**  converted  record  offset  **/ 

/**  handle  to  client  object  **/ 

/**  pointer  to  a file  **/ 

/**  pointer  to  query  file  **/ 

/**  cursor  handle  **/ 

/**  handle  to  IDBlanket  pushbutton  **/ 
/**  handle  to  list  box  **/ 
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int 

arpcres. 

ares; 

int 

count; 

int 

drpcres. 

dres; 

int 

hrpcres. 

hres; 

int 

index; 

int 

tabs[]  = 

{52,72, 84 

int 

usernxjm. 

brpcres. 

,123,162,197,243,297 
bres,  cres; 


/**  add_matches  rpc  call  results  **/ 

/**  counter  **/ 

/**  detail  rpc  call  results  **/ 

/**  header  change  rpc  call  results  **/ 

/**  list  box  index  of  list  box  string  **/ 
427};  /**  tab  settings  for  list  box  **/ 

/**  user  number,  rpc  call  result,  and  head 


call  result  for  blanket**/ 


long  int  Ibitems; 
long  num; 

struct  query  aquery; 
struct  query  bquery; 

* * / 

struct  query  dquery; 

* * / 

struct  query  hquery; 

* * / 

struct  timeval  timeout; 

* * / 

struct  W2Browse  *pBrowse; 
unsigned  long  offset; 

WORD  numtabs  = 9; 


/**  # of  items  in  list  box  **/ 

/**  holds  results  of  fread  or  fseek  **/ 

/**  structure  to  hold  add_matches  query 
parameters  **/ 

/**  structure  to  hold  header  query  params 
/**  structure  to  hold  detail  query  params 
/**  structure  to  hold  header  query  params 
/**  holds  time  variables  for  client  calls 
/**  pointer  to  a browse  structure  **/ 

/**  location  of  record  w/i  a file  **/ 

/**  number  of  tabs  in  list  box  **/ 


/ /build  file  names  using  current  user  number 
strcpy (BLFILE,  "d:blank") ; 

strcat (BLFILE,  itoa (USER,  c_usernum,  10)  ); 
strcat (BLFILE,  ".txt\0"); 


strcpy (BRFILE,  "d:brow") ; 

strcat (BRFILE,  itoa (USER,  c_usernum,  10)  ); 
strcat (BRFILE,  ".txt\0"); 


strcpy (DFILE,  "d:detl"); 

strcat (DFILE,  itoa (USER,  c_usernum,  10)  ); 
strcat (DFILE,  ".txt\0"); 

strcpy  (HFILE,  *'d:hdr*’); 

strcat (HFILE,  itoa(USER,  c_usernum,  10)  ); 

strcat (HFILE,  ".txt\0"); 


strcpy (QFILE,  "d:query"); 

strcat  (QFILE,  itoa  (USER,  c_usern\am,  10)  ); 

strcat (QFILE,  ".txtXO"); 


switch (message) 

{ 

case  WM_INITDIALOG: 

//store  start  single  query  "qinfo"  time 
current . start_qinf o = time (NULL) ; 

hfil  = fopen (HFILE,  "rb") ; 

if  (hfil  ==  NULL)  //if  file  pointer  null  alert  user 

{ 

BLD_NULLPtrDlgFunc (hDlg, message, wParam, IParam) ; 
EndDialog (hDlg, 1 ) ; 
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return  TRUE; 

} 

else  //if  file  availabe  continue 

{ 

f read (SCurrEmprlnfo,  sizeof (struct  W2EmprInfo) , 1,  hfil) / 
f close (hfil) ; 

CreateHeaderString ( ) ; 

SetDlgltemText (hDlg, ID__QEmprHeader, Headerstring) ; 

SendDlgltemMessage (hDlg, IDLB__QMatch, LB_SETHORIZONTALEXTENT, 1000,0) ; 
SendDlgltemMessage (hDlg, IDLB__QMatch, LB_SETTABSTOPS, numtabs, 

(LONG) (LPINT) tabs) ; 


off count  - 0;  //initialize  counter  for  entries  in  list  box 
brfil  = f open (BRFILE,  "rb”); 
pBrowse  - SBrowse; 

if  (brfil  ==  NULL)  //if  file  pointer  null  alert  user 

{ 

BLD_NULLPtrDlgFunc (hDlg, message, wParam, IParam)  ; 

EndDialog (hDlg, 1) ; 
return  TRUE; 

} 

else  //if  file  available  continue 

{ 


for  (count=l;  count  <=  MAXQLB;  count++)  /**  read  from  the  file  **/ 

{ 

offcount++;  //set  counter 

num  = f read (pBrowse,  sizeof (struct  W2Browse) , 1,  brfil); 


if (num  !=  0)  //if  file  contains  data  read 

{ 


offset  = pBrowse->record_loc [ 0 ] ; 
offset  = offset«  8; 

offset  = offset  + pBrowse->record_loc [1] ; 
offset  = offset«8; 

offset  = offset  + pBrowse->record_loc [2]  ; 
offset  = offset«8; 

offset  = offset  + pBrowse“>record_loc [3]  ; 


/**  convert  the  **/ 

/**  record  location  **/ 
/**  because  of  **/ 

/**  different  byte  **/ 
/**  ordering  on  **/ 

/**  the  SUN  **/ 


/**  display  the  browse  info  in  the  list  box  **/ 

ListBoxString[0]  = 0; 

sprint f ( Lis tBoxSt ring, "%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s". 
Browse . MRN, 

Browse . seq__no. 

Browse . wage_type , 

Browse . AnnFICAWages , 

Browse . AnnFICATips , 

Browse . FICATaxWheld, 

Browse . AnnWgsTpsOther , 

Browse . EmpSSN, 

Browse . EmpName, 

ultoa (of f set , recoffset,  10)); 

SendDlgltemMessage (hDlg, IDLB_QMatch, LB_ADDSTRING, 0, 

(LONG) (LPSTR) ListBoxString) ; 

} //end  of  if  n\im  !=  0 

} //end  of  for  loop  - reading  from  the  file 


f close (brfil) ; 

SendDlgltemMessage (hDlg, IDLB__QMatch, LB_SETCURSEL,  (WPARAM) 0, (LONG) 0) ; 
return  BLD__OKDlgDef ault (hDlg, message, wParam, IParam) ; 

} //end  of  if  brfil  !~  NULL 
} //  end  of  if  hfil  !-  NULL 
break;  //end  of  WM  INITDIALOG 
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case  WM_COMMAND: 
switch (wParam) 
{ 


no 

get  & 


ass 


) ; 


case  ID_Change:  //when  user  presses  arrow  icon  to  change  employer  header 

aggregate . tot_diff_report++;  //increment  # of  times  diff.  report  selected 
St rcpy (sequence,  CurrEmprInfo . seq_no) ; //store  current  sequence  nximber 

//for  display  in  data  entry  field 


BLD_SequenceDlgFunc (hDlg, message, wParam, IParam)  ; 
if  ( ( St rcmp (sequence,  CurrEmprInfo . seq_no) ) !=  0 ) 

{ 

usernum  = USER; 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; 
ShowCursor  (TRUE) ; 


//get  desired  seq_ 
//if  not  the  same 
//display  new  info 
//change  to  hourgl 
//show  hourglass 


/**  send  the  header  query  info  to  a file  and  let  the  server  know  **/ 
qf  = fopen(QFILE,  ”wb") ; 

if  (qf  ==  NULL)  //if  file  not  available  drop  out  of  all  if-else 

BLD_QueryTxtDlgFunc (hDlg, message, wParam, iParam) ; 
else  //if  file  available  continue 

{ 

strcpy (hquery . Year,  CurrEmprInfo . ReportYear) ; 

strcpy (hquery . EIN,  CurrEmprInfo . EIN) ; 

strcpy  (hquery . Estab,  CurrEmprInf o . EstabNiimber)  ; 

strcpy (hquery . seq_no,  sequence); 

hquery. FName [0]  = 0; 

hquery. LName [0]  =0; 

hquery . SSN [ 0 ] = 0; 

hquery . of f set [0]  = 0; 

f write (Shquery,  sizeof (struct  query),  1,  qf ) ; 
f close (qf ) ; 


/**  clnt_create  is  one  step  down  from  a straight  rpc  call 

it  is  required  here  for  control  of  the  time  out  value  **/ 
clnt  = clnt_create (HOST,  GET_SEQ_HEADER,  VERSNUM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 

{ 

fprintf (ef , "\n%s\n",  "Change  Header,  Get  Seq  Header,  clnt_create" 

fprintf(ef,  "%s\n",  "CLIENT  HANDLE  IS  NULL") ; 
fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n",  t_errno) ; 
f close  (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem (hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  clnt  = NULL 

else  /**  set  re-try  timeout  value  for  employer  header  request** 


{ 

timeout . tv_sec  = RETRY_TIME; 
timeout. tv  usee  = 0; 


/ 
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) ; 


ol")  ; 


) ; 


1")  ; 


**  / 


NUMBER" ) ; 


cres  = clnt_control (clnt , CLSET_RETRy_TIMEOUT, (char  _TKFAR  *)&timeout 

if  (cres  ==  0) 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) / 
else  //if  error  file  available  continue 
{ 

fprintf (ef , "\n%s\n",  "Change  Header,  Get  Seq  Header,  clnt_contr 

fprintf(ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET"); 
fclose (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE);  //hide  hourglass 
SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  cres  = 0 

else  /**  set  total  timeout  & request  employer  header  info  **/ 

{ 

timeout . tv_sec  = TOT_TIME; 
timeout . tv_usec  = 0; 

hrpcres  = clnt_call (clnt, PROCNUM, (xdrproc_t ) xdr_int , 

(caddr_t) Susernum, (xdrproc_t ) xdr_int,  (caddr_t) Shres,  timeout 

clnt_destroy (clnt) ; 

if  ((hrpcres  !=  0)  I I (hres  !=  1))  /**  check  for  errors  **/ 

{ 

ef  = fopen(EFILE,  "a") ; 
if  (ef  ==  NULL) 

BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else 
{ 

fprintf  (ef,  "\n%s\n",  "Change  Header,  Get  Seq  Header,  clnt_cal 


fprintf (ef,  "HRPCRES  = %d\n",  hrpcres  ); 
fprintf (ef,  "HRES  = %d\n",  hres) ; 
if  (hrpcres  !=  0)  /**  if  rpc  call  failed  **/ 

{ 

/**  rpc_createrr  is  a global  variable  returned  by  rpc_call 
and  relates  the  status  of  the  call  itself  **/ 

/**  t_errno  further  delineates  the  error  in  certain  settings 


fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n\n" , t_errno) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

else  /**  if  sequence  no.  could  not  be  found  **/ 

{ 

fprintf (ef,  "%s\n\n",  "SEARCH  ENGINE  COULD  NOT  FIND  SEQUENCE 


BLD_SeqErrDlgFunc (hDlg, message, wParam,  IParam)  ; 
ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

fclose (ef ) ; 


usercode . c 


Wed  Mar  2 14:14:17  1994 


16 


} //end  of  ef  !=  NULL 

}//end  of  error  check  (if  errors,  drop  out  of  all  if-else) 
else 
{ 

hfil  = fopen(HFILE,  "rb") ; 

if  (hfil  ==  NULL)  //if  file  pointer  null  alert  user 

{ 

BLD_HFileDlgFunc (hDlg, message, wParam, IParam)  ; 

ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

Set Focus (hLB) ; 

} 

else  //if  file  availabe  continue 

{ 

f read (SCurrEmprlnf o,  sizeof (struct  W2EmprInfo) , 1,  hfil) ; 
fclose (hfil) ; 

CreateHeaderString ( ) ; 

SetDlgltemText (hDlg, ID_QEmprHeader, Headerstring) ; 

ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem (hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

} //everything  executed  property,  new  employer  header  displayed 
} //end  of  set  total  timeout  and  request  employer  header 
} //end  of  set  retry  timeout  for  employer  header 
} //end  of  if  qf  !=  NULL 
} //end  of  if  secjuence  number  not  the  same 
else 
{ 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

break;  //end  of  ID_Change 


* * / 


case  IDOK:  /**  when  user  hits  return  in  listbox  **/ 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourglass 
ShowCursor  (TRUE) ; //show  hourglass 

ListBoxString[0]  =0;  /**  use  index  to  get  string  then 

index  = (WORD)  SendDlgltemMessage (hDlg,  /**  parse  out  the  offset  **/ 

IDLB_QMatch,  LB_GETCURSEL,  0,  0 ) ; /**  and  the  sequence  nxamber  **/ 

SendDlgltemMessage (hDlg, IDLB_QMatch, LB_GETTEXT, 
index,  (LONG)  (LPSTR) ListBoxString)  ; 
strncpy (recof f set,  ListBoxString  + 95,  29); 

recof f set [29]  = 0;  /**  terminate  string  **/ 

strncpy (dquery. seq_no,  ListBoxString  + 12,  3); 

dquery . seq_no [3]  = 0;  /**  terminate  string  **/ 


usernum  = USER; 

/**  send  the  detail  query  info  to  a file  and  let  the  server  know  **/ 
qf  = fopen(QFILE,  "wb") ; 

if  (qf  ==  NULL)  //if  file  not  available  drop  out  of  all  if-else 
BLD_QueryTxtDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  file  available  continue 

{ 

strcpy (dquery .Year,  QYear) ; 
strcpy (dquery . EIN,  QEIN); 
strcpy (dquery .Estab,  QEstab) ; 
dquery . FName [0]  = 0; 
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dquery . LName [0]  = 0; 
dquery. SSN[0]  = 0; 

St rcpy (dquery • of f set , recoffset) ; 

fwrite (Sdquery,  sizeof (struct  query),  1,  qf ) ; 

f close (qf ) ; 

/**  clnt_create  is  one  step  down  from  a straight  rpc  call 

it  is  required  here  for  control  of  the  time  out  value  **/ 
clnt  = clnt_create (HOST,  GET_EMPL_DETAIL,  VERSNUM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a"); 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD__ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 

{ 

fprintf  (ef , "\n%s\n",  "Query  Info,  Get_Empl_Detail,  clnt_create") ; 
fprintf(ef,  "%s\n",  "CLIENT  HANDLE  IS  NULL"); 
fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n",  t_errno) ; 
f close  (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem (hDlg,  IDLB_QMatch) ; 

SetFocus  (hLB) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  clnt  = NULL 

else  /**  set  re-try  timeout  value  **/ 

{ - 

timeout . tv_sec  = RETRY_TIME; 
timeout . tv_usec  = 0; 

cres  = clnt_control (clnt,CLSET_RETRY_TIMEOUT, (char  _TKFAR  *)&timeout); 
if  (cres  ==  0) 

{ 

ef  = fopen(EFILE,  "a"); 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 

{ 

fprintf (ef,  "\n%s\n",  "Query  Info,  Get_Empl_Detail,  clnt_control") 

fprintf  (ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET"); 
fclose(ef); 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  cres  = 0 

else  /**  set  total  timeout  & request  employee  detail  **/ 

{ 

timeout . tv_sec  = TOT_TIME; 
timeout . tv_usec  = 0; 

drpcres  = clnt_call (clnt , PROCNUM,  (xdrproc_t ) xdr_int , 

(caddr_t) &usernum,  (xdrproc_t) xdr_int, 

(caddr_t) Sdres,  timeout) ; 

clnt_destroy (clnt) ; 

if  ((drpcres  !=  0)  II  (dres  !=  1)) 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam)  ; 
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else  //if  error  file  available  continue 

{ 

fprintf (ef , ''\n%s\n",  "Single,  Get_Empl_Detail,  clnt_call"); 

fprintf (ef , "%d  = DRPCRES\n",  drpcres  ) ; 

fprintf (ef , "%d  = DRES\n\n",  dres) ; 

fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 

fprintf (ef , "%d  = T_ERRNO\n",  t_errno) ; 

fclose (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE);  //hide  hourglass 
SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 

} //end  of  error  check  on  drpcres  and  dres 
else  //parameters,  communications  & data  verified 
{ 

dfil  = fopen(DFILE,  "rb") ; /**  open  the  detail  file  **/ 

if  (dfil  ==  NULL)  //check  file  ptr 

{ 

BLD_DFileErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg, IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

else 

{ /**  read  in  employee  detail  info  **/ 

f read (SEDetail,  sizeof (struct  W2EmpInfo) , 1,  dfil) ; 
fclose  (dfil)  ; 

CreateEDetail 0 ; 

BLD_EmployeeDetailDlgFunc (hDlg, message, wParam, IParam) ; 
ShowCursor (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem (hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

} //everything  executed  properly 
} / /end  of  set  total  timeout 

} //end  of  set  re-try  timeout  value 
} //end  of  qf  !=  NULL 
break;  / /end  of  IDOK 

case  IDCANCEL: 

if  ( ! BLD_OKDlgDefault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break;  //end  of  IDCANCEL 

case  ID_CLOSE:  //when  user  presses  the  close  button 

current . stop_single  = time (NULL) ; //store  single  cjuery  stop  time 
BLD_questDlgFunc (hDlg, message, wParam, IParam) ; 

EndDialog (hDlg,  ID_CLOSE) ; 
break;  //end  of  ID_CLOSE 

case  IDBlanket:  //when  user  presses  potential  blanket  button 

current . stop_single  = time (NULL) ; //store  single  query  stop  time 
aggregate . tot_blanket++;  //increment  # of  times  potential  blanket  selected 
BLD_questDlgFunc (hDlg, message, wParam, IParam)  ; 
usernum  = USER; 

strcpy (sequence,  CurrEmprInf o . seq_no) ; //get  current  seg_no 
BLD_SequenceDlgFunc (hDlg, message, wParam, IParam) ; //get  new  seq_no 

/**  send  the  header  query  info  to  a file  and  let  the  server  know  **/ 
qf  = fopen(QFILE,  "wb") ; 
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if  (qf  ==  NULL)  //if  file  not  available  drop  out  of  all  if-else 
BLD_QueryTxtDlgFunc (hDlg, message, wParam, iParam) ; 
else  / /if  file  available  continue 

{ 

strcpy (bquery . Year,  CurrEmprInfo . ReportYear) ; 

strcpy (bquery . EIN,  CurrEmprInfo . EIN) ; 

strcpy (bquery -Estab,  CurrEmprInfo . EstabNumber) ; 

strcpy (bquery . seq_no,  sequence); 

bquery .FName [0]  = 0; 

bquery . LName [0]  = 0; 

bquery . SSN [0]  = 0; 

fwrite (Sbquery,  sizeof (struct  query),  1,  qf ) ; 
f close (qf ) ; 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourglass 
ShowCursor  (TRUE);  //show  hourglass 

clnt  = clnt_create (HOST,  GET_BLANKET,  VERSNUM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 
{ 

fprintf (ef , "\n%s\n",  "Query  Info,  Get  Blanket,  clnt_create") ; 
fprintf(ef,  "%s\n\n",  "CLIENT  HANDLE  IS  NULL"); 
fprintf  (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n\n" , t_errno) ; 
f close  (ef ) ; 

BLD_BlanketErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

■ hBl  = GetDlgltem (hDlg, IDBlanket ) ; 

SetFocus  (hBl) ; 

} //end  of  if  ef  !=  NULL 
} //end  of  if  clnt  = NULL 
else 
{ 

timeout . tv_sec  = RETRY_TIME;  /**  set  re-try  timeout  value  **/ 
timeout . tv_usec  = 0 ; 

cres  = clnt_control (clnt , CLSET_RETRY_TIMEOUT,  (char  _TKFAR  *)&timeout); 
if  (cres  ==  0)  //check  for  errors 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 

{ 

fprintf (ef,  "\n%s\n",  "Query  Info,  Get  Blanket,  clnt_control" ) ; 
fprintf (ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET"); 
f close  (ef ) ; 

BLD_BlanketErrDlgFunc (hDlg, message, wParam, IParam)  ; 

ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hBl  = GetDlgltem (hDlg, IDBlanket ) ; 

SetFocus (hBl) ; 

} //end  of  if  ef  !=  NULL 
} //end  of  if  cres  = 0 
else 
{ 

timeout . tv_sec  = TOT_TIME;  /**  set  total  timeout  & request  blanket  in 

fo  **/ 

timeout . tv_usec  = 0; 

brpcres  = clnt_call (clnt, PROCNUM, (xdrproc_t ) xdr_int. 
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(caddr_t) Susernum,  (xdrproc_t ) xdr_int,  (caddr_t) fibres,  timeout); 
clnt_destroy (clnt ) ; 

if  ( (brpcres  !=  0)  | | (bres  !=  1))  //check  for  errors 

/**  rpc_createrr  is  a global  variable  returned  by  rpc_call 
and  relates  the  status  of  the  call  itself  **/ 

/**  t_errno  further  delineates  the  error  in  certain  settings  **/ 

{ 

ef  = fopen(EFILE,  "a"); 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam,  IParam)  ; 
else  //if  error  file  available  continue 

{ 

fprintf(ef,  "\n%s\n",  "Query  Info,  Get  Blanket,  clnt_call") ; 
fprintf(ef,  "%d  = BRPCRESXn",  brpcres); 
fprintf(ef,  ”%d  = BRES\n",  bres) ; 
if  (brpcres  !=  0)  //if  rpc  call  failed 
{ 

fprintf (ef , "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef , "%d  = T_ERRNO\n\n" , t_errno) ; 

BLD_BlanketErrDlgFunc (hDlg, message, wParam,  IParam)  ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hBl  = GetDlgItem(hDlg, IDBlanket) ; 

SetFocus (hBl ) ; 

} 

else  //if  sequence  no.  could  not  be  found 

{ 

fprintf (ef,  "%s\n\n",  "SEARCH  ENGINE  COULD  NOT  FIND  SEQUENCE  NUM 

BER" ) ; 

BLD_SeqErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE);  //hide  hourglass 
SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

f close (ef ) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  brpcres  or  bres  incorrect 
else 
{ 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

EndDialog (hDlg, 1 ) ; 

dfil  = f open (BLFILE,  "rb");  //check  file  ptr  before  opening  BI 

NFO 

if  (dfil  ==  NULL) 

BLD_BlankErrDlgFunc (hDlg, message, wParam, IParam) ; 
else 
{ 

f close (dfil) ; 

BLD_Function6DlgFunc (hDlg, message^ wParam, IParam) ; 

} 

} //end  of  verification 
} //end  of  set  total  timeout  value 
} //end  of  set  re-try  timeout  value 
} //end  of  if  header  query  file  available 
break;  / /end  of  IDBlanket 

case  IDLB_QMatch:  /**  when  user  double-clicks  in  listbox  **/ 

if  (HIWORD (IParam) ==LBN_DBLCLK) 

{ 


hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourglass 
ShowCursor  (TRUE) ; //show  hourglass 
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■k-k  j 


ListBoxString[0]  = 0;  /**  use  index  to  get  string  then 

index  = (WORD)  SendDlglteimMessage (hDlg,  /**  parse  out  the  offset  **/ 

IDLB_QMatch, LB_GETCURSEL, 0 , 0 ) ; /**  and  the  sequence  number  **/ 

SendDlgltemMessage (hDlg, IDLB_QMatch, LB_GETTEXT, 
index, (LONG) (LPSTR)ListBoxString); 
strncpy (recof f set , ListBoxString  + 95,  29); 

recof f set [29]  = 0;  /**  terminate  string  **/ 

strncpy (dquery . seq_no,  ListBoxString  + 12,  3); 

dquery . seq_no [3]  = 0;  /**  terminate  string  **/ 

usernum  = USER; 

/**  send  the  detail  query  info  to  a file  and  let  the  server  know  **/ 
qf  = fopenCQFILE,  "wb") ; 

if  (qf  ==  NULL)  //if  file  not  available  drop  out  of  all  if-else 
BLD_QueryTxtDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  file  available  continue 

{ 

strcpy (dquery . Year,  QYear); 

strcpy (dquery . EIN,  QEIN) ; 

strcpy (dquery . Estab,  QEstab) ; 

dquery . FName [ 0 ] = 0; 

dque  ry . LName [ 0 ] = 0 ; 

dquery. SSN[0]  = 0; 

strcpy (dquery . of f set , recof fset) ; 

f write (Sdquery,  sizeof (struct  query),  1,  qf ) ; 

f close (qf ) ; 

/**  clnt_create  is  one  step  down  from  a straight  rpc  call 

it  is  required  here  for  control  of  the  time  out  value  **/ 
clnt  = clnt_create (HOST,  GET_EMPL_DETAIL,  VERSNUM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a")  ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 

{ 

fprintf(ef,  "\n%s\n'',  "Query  Info,  Get_Empl_Detail , clnt_create")  ; 
fprintf(ef,  "%s\n",  "CLIENT  HANDLE  IS  NULL"); 
fprintf (ef , "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf  (ef , "%d  = T_ERRNO\n",  t_errno) ; 
f close  (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem (hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
} / /end  of  if  clnt  = NULL 

else  /**  set  re-try  timeout  value  **/ 

{ 

timeout . tv_sec  = RETRY_TIME; 
timeout • tv_usec  = 0; 

ores  = clnt_control (clnt, CLSET_RETRY_TIMEOUT, (char  _TKFAR  *)&timeout); 
if  (cres  ==  0) 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 

{ 

fprintf (ef,  "\n%s\n",  "Query  Info,  Get_Empl_Detail,  clnt_control" ) 
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fprintf(ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET") ; 
fclose  (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam)  ; 

ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  ores  = 0 

else  /**  set  total  timeout  & request  employe  detail  info**/ 

{ 

timeout . tv_sec  = TOT_TIME; 
timeout . tv_usec  = 0; 

drpcres  = clnt_call (clnt, PROCNUM, (xdrproc_t ) xdr_int, 

(caddr_t) Susernum,  (xdrproc_t ) xdr_int, 

(caddr_t) Sdres,  timeout) ; 

clnt_destroy (clnt) ; 

if  ((drpcres  !=  0)  II  (dres  !=  1)) 

{ 

ef  = fopen(EFILE,  "a"); 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam,  IParam)  ; 
else  //if  error  file  available  continue 
{ 

fprintf (ef , "\n%s\n",  "Query  Info,  Get_Empl_Detail,  clnt_call") 

fprintf (ef , "%d  = DRPCRESXn",  drpcres  ); 

fprintf (ef,  "%d  = DRES\n\n",  dres); 

fprintf (ef,  "%d  = RPC  ERROR\n”,  rpc_createerr) ; 

fprintf (ef,  "%d  = T_ERRNO\n\n",  t_errno) ; 

fclose  (ef  ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 
SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 

} //end  of  error  check  on  dprcres  and  dres 
else  //parameters,  communications  & data  verified 
{ 

dfil  = fopen(DFILE,  "rb") ; /**  open  the  detail  file  **/ 

if  (dfil  ==  NULL)  //check  file  ptr 

{ 

BLD_DFileErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg, IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

else 

{ /**  read  in  employe  info  **/ 

f read (SEDetail,  sizeof (struct  W2EmpInfo) , 1,  dfil); 
fclose (dfil) ; 

CreateEDetail () ; 

BLD_EmployeeDetailDlgFunc (hDlg, message,  wParam,  IParam)  ; 
ShowCursor (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgI tern (hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

} //everything  executed  properly 
} / /end  of  set  total  timeout 

} //end  of  set  re-try  timeout  value 
} //end  of  qf  !=  NULL 
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} //end  of  if  double-clicked 
break;  //end  of  IDLE  QMatch 


case  ID_QAddMatch:  /**  when  user  presses  additional  matches  button  **/ 

//file  availability  previously  checked 

current . add  match++;  //increment  add  matches  counter 


//get  # of  items  in  listbox 

Ibitems  = SendDlgltemMessage (hDlg, IDLB_QMatch,  LB_GETCOUNT, 0,0) ; 

Itoa (Ibitems,  recoffset,  10);  //convert  to  string  for  storage  in  aquery 


usernum  = USER; 

/**  send  the  add_matches  query  info  to  a file  and  let  the  server  know  **/ 
qf  = fopen(QFILE,  "wb") ; 

if  (qf  ==  NULL)  //if  file  not  available  drop  out  of  all  if-else 
BLD_QueryTxtDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  file  available  continue 

{ 

strcpy (aquery , Year,  QYear); 

St rcpy (aquery .EIN,  QEIN) ; 
strcpy (aquery . Estab,  QEstab) ; 
aquery . FName [0]  = 0; 
aquery . LName [0]  = 0; 
aquery . SSN[0]  = 0; 
aquery . seq_no [0]  = 0; 

strcpy (aquery . of f set , recoffset) ; //in  this  case,  recoffset  = Ibitems 

f write (&aquery,  sizeof (struct  query),  1,  qf ) ; 

fclose(qf); 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourgl 

ass 

ShowCursor  (TRUE);  //show  hourglass 

/**  clnt_create  is  one  step  down  from  a straight  rpc  call 

it  is  required  here  for  control  of  the  time  out  value  **/ 
clnt  = clnt_create (HOST,  ADD_MATCHES,  VERSNUM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 
{ 

fprintf (ef , "\n%s\n",  "Query  Info,  Add_Matches,  clnt_create" ) ; 
fprintf(ef,  "%s\n",  "CLIENT  HANDLE  IS  NULL"); 
fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n",  t_errno) ; 
f close (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam,  IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 
SetCursor  (hCur) ; //reset  to  arrow 
hLB=GetDlgItem(hDlg,  IDLB_QMatch)  ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  clnt  = NULL 
else  /**  set  re-try  timeout  value  **/ 

{ 

timeout . tv_sec  = RETRY_TIME; 
timeout . tv_usec  = 0; 

cres  = clnt_control  (clnt , CLSET_RETRY_TIMEOUT,  (char  _TKFAR  *)&timeout); 
if  (cres  ==  0) 
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{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam)  ; 
else  //if  error  file  available  continue 

{ 

fprintf (ef , "\n%s\n",  "Query  Info,  Add_Matches,  clnt_control") ; 
fprintf(ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET") ; 
f close  (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  cres  = 0 

else  /**  set  total  timeout  & request  add  matches  info**/ 

{ 

timeout . tv_sec  = TOT_TIME; 
timeout . tv_usec  = 0 ; 

arpcres  = clnt_call (clnt , PROCNUM, (xdrproc_t ) xdr_int , 

(caddr_t) &usernum,  (xdrproc_t) xdr_int, 
(caddr_t) &ares,  timeout) ; 

clnt_destroy (clnt)  ; 

if  ((arpcres  !=  0)  M (ares  !=  1)) 

{ 

ef  = fopen(EFILE,  "a"); 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 

{ 

if  (arpcres  !=  0)  //if  rpc  error 

{ 

fprintf (ef , "\n%s\n",  "Query  Info,  Add_Matches,  clnt_call") 

fprintf(ef,  "%d  = ARPCRESNn",  arpcres  ); 

fprintf (ef,  "%d  = ARES\n\n",  ares) ; 

fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 

fprintf (ef,  "%d  = T_ERRNO\n\n",  t_errno) ; 

fclose  (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

else  //if  result  error 

{ 

current . add_match — ; //adjust  count  if  user  presses 

//add  matches  by  error  or  if 
//no  more  matches  exist  and  listbox 
/ /was  not  added  to 

fprintf  (ef,  "\n%s\n",  "Query  Info,  Add_Matches,  clnt_call") 
fprintf (ef,  "NO  MORE  MATCHES  FOUND\n"); 
fprintf (ef,  "%d  = ARES\n\n",  ares) ; 
fclose  (ef ) ; 

BLD_NoMoreMatchesDlgFunc (hDlg, message, wParam, IParam)  ; 
ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

} //end  of  ef  !=  NULL 

} //end  of  error  check  on  aprcres  and  ares 
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else  //parameters,  communications  & data  verified,  fill  list  box 

{ 

brfil  = f open (BRFILE,  "rb") ; /**  open  the  browse  file  * 

if  (brfil  ==  NULL)  //if  file  not  available  alert  user 

{ 

BLD_DataErrDlgFunc (hDlg, message, wParam, IParam)  ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_QMatch) ; 

SetFocus (hLB) ; 

} 

else  //if  file  available  continue 

{ 

pBrowse  = SBrowse; 

for  (count=l;  count  <=MAXQLB;  count++)  /**  read  from  the  file  **/ 

{ 

num  = f read (pBrowse,  sizeof (struct  W2Browse) , 1,  brfil); 
if (num  !=  0)  //if  file  contains  data  or  not  EOF 
{ 


offset 

= 

pBrowse->record_loc  [0] ; 

/ * * 

convert  the  **/ 

offset 

= 

offset<<  8; 

/ * * 

record  location  * 

offset 

offset  + pBrowse->record_ 

_loc  [1]  ; 

/** 

because  of  **/ 

offset 

= 

of f set<<8 ; 

/ * * 

different  byte  ** 

offset 

= 

offset  + pBrowse->record_ 

_loc[2]  ; 

/** 

ordering  on  **/ 

offset 

= 

of f set<<8 ; 

/ * * 

the  S.UN  **/ 

offset 

= 

offset  + pBrowse->record_ 

_loc[3]  ; 

/**  display  the  browse  info  in  the  list  box  **/ 

ListBoxString [ 0 ] = 0; 

sprint f (ListBoxString,  ’'%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s". 
Browse .MRN, 

Browse . seq_no , 

Browse . wage_type. 

Browse . AnnFICAWages , 

Browse .AnnFICATips, 

Browse . FICATaxWheld, 

Browse .AnnWgsTpsOther, 

Browse . EmpSSN, 

Browse . EmpName , 

ultoa  (of f set,  recoffset,  10)); 

SendDlgltemMessage (hDlg, IDLB_QMatch, LB_ADDSTRING, 0, 

(LONG) (LPSTR) ListBoxString) ; 

} //end  of  if  file  contains  data  or  not  EOF 
} / /end  of  for  loop 

f close (brfil) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB  = GetDlgItem(hDlg, IDLB_QMatch) ; 

SetFocus (hLB) ; 

SendDlgltemMessage (hDlg, IDLB_QMatch, LB_SETCURSEL, 

(WPARAM) Ibitems, (LONG) 0) ; 

} //end  of  if  brfil  !=  NULL 

} //everything  executed  properly 
} //end  of  set  total  timeout 
} //end  of  set  re-try  timeout  value 
} //end  of  qf  !=  NULL 
break;  //end  of  ID_QAddMatch 

default : 

return  BLD_OKDlgDefault (hDlg, message, wParam, IParam) ; 
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break; 

} 

break; 
default : 

return  BLD_OKDlgDefault (hDlg, message, wParam, IParam)  ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  DISPLAY  MATCHES  TO  SINGLE  QUERY 


/*************★***************★**********************★*****★*****★*************★******/ 
/*  displays  records  for  blanket  report  */ 

/***********************★*************************************************************/ 


int  BLD_Function6DlgFunc (hWnd, message, wParam, IParam)  /*  Startup  procedure  for  modal  dialog 
box  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 


IpProc  = MakeProcInstance (BLD_Function6DlgProc, hinst ) ; 

ReturnValue  = DialogBox (hinst , (LPSTR) "BINFO" , MainhWnd,  IpProc); 
FreeProcInstance (IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_Cannot Create, "BINFO", 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 


BOOL  FAR  PASCAL  BLD_Function6DlgProc (hDlg, 
ocedure  */ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

char  BLFILE[16], 

HFILE [14] ; 

char  c usernum[3] ; 


char  ListBoxString [200] , 
recoff set [30] ; 

FILE  *datafile,  *hfil; 

HCURSOR  hCur; 

HWND  hLB; 


message,  wParam,  IParam)  /*  Modal  dialog  box  pr 


//blanket  file 
//header  file 

//user  number  converted  to 
//character  for  concatenation 
//in  file  name 

/**  list  box  string  **/ 

/**  converted  record  offset  **/ 

/**  pointers  to  data  files  **/ 

/**  cursor  handle  **/ 

/**  handle  to  list  box  **/ 


int  count; 
int  index; 
ing  **/ 

int  tabs[]  = {52,72,84,123,162,197,243,297,427}; 


/**  counter  **/ 

/**  list  box  index  of  list  box  str 
/**  tab  settings  for  list  box  **/ 
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long  nuin;  /**  was  anything  read  from  the  fil 

e **/ 

unsigned  long  offset;  /**  location  of  record  w/i  a file 

* * / 

WORD  numtabs  = 9;  /**  number  of  tabs  in  list  box  **/ 

/ /build  file  names  using  current  user  number 
strcpy (BLFILE,  "d:blank"); 

strcat (BLFILE,  itoa (USER,  c_usernum,  10)  ); 
street  (BLFILE,  ".txt\0"); 

strepy (HFILE,  "d:hdr"); 

street (HFILE,  itoa (USER,  c_usernum,  10)  ); 

street  (HFILE,  ".txt\0"); 


switch (message) 

{ 

case  WM_INITDIALOG: 

on  of 


//file  availability  checked  in  the  IDBlanket  Secti 
//BLD_OK  dialog  before  this  dialog  is  initialized 


hfil  = fopen(HFILE,  "rb") ; 

if  (hfil  ==  NULL)  //if  file  pointer  null  alert  user  and  don't  display  blanket 

dialog 

{ 

BLD_NULLPtrDlgFunc (hDlg, message, wParam, iParam) ; 

EndDialog (hDlg, 1 ) ; 
return  TRUE; 

} 

else  //if  file  availabe  continue 

{ 

f read (SCurrEmprlnfo,  sizeof (struct  W2EmprInfo) , 1,  hfil) ; 
f close (hfil) ; 

CreateHeaderStringO  ; 

SetDlgltemText (hDlg, ID_BEmprHeader, Headerstring) ; 

SendDlgltemMessage (hDlg, IDLB_BMatch, LB_SETHORIZONTALEXTENT, 1000,0); 
SendDlgltemMessage (hDlg, IDLB_BMatch, LB_SETTABSTOPS , numtabs, 

(LONG) (LPINT)tabs) ; 


datafile  = f open (BLFILE,  "rb");  /**  open  the  file  and  set  the  pointer  **/ 

if  (datafile  ==  NULL)  //if  file  pointer  null  alert  user 

{ 

BLD_NULLPtrDlgFunc  (hDlg, message, wParam, IParam) ; 

EndDialog (hDlg, 1 ) ; 
return  TRUE; 

} 

else  //if  file  available  continue 

{ 

for  (count=l;  count  <=  MAXB;  count++)  /**  read  from  the  file  **/ 
if  (! feof (datafile) ) 

{ 

niom  = f read (SBlanket [count-1 ] , sizeof (struct  W2EmpInfo) , 1,  datafile); 
if (num  !=  0)  //if  file  contains  data 
{ 

ListBoxString [0 ] = 0; 

sprint f (ListBoxString, "%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s". 
Blanket [count-1 ] .MRN, 

CurrEmprInf o . seq_no,  //  always  the  current  sequence  number 

"O\0",  //  wage  type  hard-coded  for  now  11/3/93 

Blanket [count-1 ] . AnnFICAWages , 
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Blanket [count-1] . AnnFICATipSr 
Blanket [count-1] . FICATaxWheld, 

Blanket [count-1] . AnnWgsTpsOther, 

Blanket [count-1] .EmpSSN, 

Blanket [count-1] .EmpName, 

ultoa  (of f set , recoffset,  10)); 

SendDlgltemMessage (hDlg, IDLB_BMatch, LB_ADDSTRING, 0, 

(LONG) (LPSTR) ListBoxString) ; 

} //end  of  if  num  !=  0 
} //end  of  if  not  EOF 

fclose (datafile) ; 

SendDlgltemMessage (hDlg,  IDLB_BMatch, LB_SETCURSEL, (WPARAM) 0, (LONG) 0) ; 
return  BLD_Function6DlgDefault (hDlg, message, wParam, IParam) ; 

} //end  of  if  datafil  !=  NULL 
} //  end  of  if  hfil  !=  NULL 
break;  //end  of  WM  INITDIALOG 


case  WM_COMMAND: 
switch (wParam) 
{ 


case  IDOK:  /**  when  user  hits  return  inside  the  listbox  **/ 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourglass 
ShowCursor  (TRUE) ; //show  hourglass 

ListBoxString [0 ] = 0; 

index  = (WORD)  SendDlgltemMessage (hDlg, 

IDLB_BMatch, LB_GETCURSEL, 0,0); 
strcpy (sequence,  CurrEmprInf o . seq_no) ; 

CopyBlanket_EDetail (index) ; 

CreateEDetail () ; 

BLD_EmployeeDetailDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg, IDLB_BMatch) ; 

SetFocus (hLB) ; //set  focus  back  to  listbox 

break;  //end  of  IDOK 

case  IDCANCEL:  //if  user  presses  Esc 

if  ( !BLD_Function6DlgDefault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

case  IDLB_BMatch:  /**  when  user  double  clicks  inside  the  listbox  **/ 

if  (HIWORD  (IParam)  ==LBN_DBLCLK) 

{ 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourglass 
ShowCursor  (TRUE);  //show  hourglass 

ListBoxString [0]  = 0; 

index  = (WORD)  SendDlgltemMessage (hDlg, 

IDLB_BMatch, LB_GETCURSEL, 0,0); 
strcpy (sequence,  CurrEmprInfo . seq_no) ; 

CopyBlanket_EDetail (index) ; 

CreateEDetail () ; 

BLD_EmployeeDetailDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg, IDLB_BMatch)  ; 


usercode . c 


Wed  Mar  2 14:14:17  1994 


29 


SetFocus (hLB) ; //set  focus  back  to  listbo 

} 

break;  / /end  of  IDLB_BMatch 

case  IDPRINTB:  //when  user  presses  Print  Blanket 

aggregate . tot_pr_blanket++;  //increment  # of  times  print  blanket  selected 

BLD_PrintBlanketDlgFunc (hDlg, message, wParam,  iParam) ; 

break; 

case  ID_CLOSE: 

write_aggregate (hDlg, message, wParam, IParam) ; //write  aggregate  stats  to  file 

EndDialog (hDlg, ID_CLOSE)  ; 

break; 

default : 

return  BLD_Function6DlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_Function6DlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  DISPLAY  BLANKET  RECORDS 


/*************************************************************************************/ 

/*  prompts  user  to  enter  report  info  */ 

/****************★************************★*******★***********************************/ 

int  BLD_ReportDlgFunc (hWnd, message, wParam, IParam)  /*  Startup  procedure  for  modal  dialog  bo 

X */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance ( (FARPROC) BLD_ReportDlgProc, hinst ) ; 

ReturnValue  = DialogBox (hinst,  (LPSTR) "REPORT", hWnd,  IpProc); 

FreeProcInstance (IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, "REPORT", 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 

BOOL  FAR  PASCAL  BLD_ReportDlgProc (hDlg,  message,  wParam,  IParam)  /*  Modal  dialog  box  proce 
dure  * / 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 


switch (message) 
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{ 

case  WM_INITDIALOG: 

return  BLD_ReportDlgDe fault  (hDlg, message,  wParam,  IPararti)  ; 
break; 

case  WM_COMMAND: 
switch (wParam) 

{ 

case  IDOK: 

RYear[0]  = 0; 

REIN[0]  = 0; 

REstab[0]  = 0; 

GetDlgltemText (hDlg, IDMF_RYear, (LPSTR) RYear, 5) ; /**  get  N+1  characters  ** 

/ 

GetDlgltemText (hDlg, IDMF_REIN, (LPSTR) REIN, 11) ; 

GetDlgltemText (hDlg, IDMF_REstab,  (LPSTR) REstab, 5) ; 

EndDialog (hDlg, IDOK)  ; 

BLD_ReportStatisticsDlgFunc (hDlg, message, wParam, IParam) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_ReportDlgDef ault (hDlg, message, wParam, IParam)  ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 
default : 

return  BLD_ReportDlgDef ault (hDlg, message, wParam, IParam)  ; 
break; 

} 

break; 
default : 

return  BLD_ReportDlgDef ault (hDlg, message, wParam,  IParam) ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  REPORT  ENTRY  SCREEN 


/******■***********************★*********************************************************** 

/ 

/*  displays  report  statistics  - not  implemented  in  the  prototype  * 

/ 

y***************************************************************************************** 

/ 

int  BLD_ReportStatisticsDlgFunc (hWnd, message, wParam, IParam)  /*  Startup  procedure  for  modal 
dialog  box  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance ( (FARPROC) BLD_ReportStatisticsDlgProc, hinst)  ; 

ReturnValue  = DialogBox (hinst , (LPSTR) "STATISTICS",  MainhWnd,  IpProc); 

FreeProcInstance (IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_Cannot Create, "STATISTICS", 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 
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BOOL  FAR  PASCAL  BLD_ReportStatisticsDlgProc (hDlg,  message,  wParam,  IParam)  /*  Modal  dialog 
box  procedure  */ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_ReportStatisticsDlgDef ault (hDlg,message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 
switch (wParam) 

{ 

case  IDOK: 

if  ( ! BLD_ReportStatisticsDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_ReportStatisticsDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 
default: 

return  BLD_ReportStatisticsDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_ReportStatisticsDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  DISPLAY  REPORT  STATISTICS  DIALOG 


/************************■************************★************★********/ 

/*  prompts  user  to  enter  browse  report  info  */ 

/**********************************************************************/ 

int  BLD_BrowseEntryDlgFunc (hWnd, message, wParam, IParam)  /*  Startup  procedure  for  modal  dial 
og  box  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance ( (FARPROC) BLD_BrowseEntryDlgProc, hinst) ; 

ReturnValue  = DialogBox (hinst , (LPSTR) "NEWBROWSE",  hWnd,  IpProc); 

FreeProcInstance (IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, "NEWBROWSE", 

MB_OK  1 MB_ICONHAND) ; 

return  ReturnValue; 

} 

BOOL  FAR  PASCAL  BLD_BrowseEntryDlgProc (hDlg,  message,  wParam,  IParam)  /*  Modal  dialog  box 
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procedure  */ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  iParam; 

{ 

//browse  file 
//header  file 
//query  file 

//user  number  converted  to  character  for  concatena 
//in  file  name 


char  BRFILE[14] , 
HFILE[14] , 
QFILE[13] ; 

char  c_usernum[3] ; 

tion 


CLIENT  __TKFAR  *clnt;  /** 

FILE  *dfil,*hfil;  /** 

FILE  *qf,  *ef;  /** 

HCURSOR  hCur;  /** 

HWND  hEIN,  hYear;  /** 

HWND  hMRN;  // 

int  cres;  /** 

int  usernum,  brrpcres,  brres;  /** 


handle  to  client  **/ 

file  ptrs  to  server  data  files  **/ 
pointer  to  query  file  **/ 

cursor  handle  **/ 

handles  to  IDMF_BrEIN  and  IDMF_BrYear  **/ 
handle  to  IDMF_BrStart 

clnt_control  result  **/ 

user  number,  rpc  call  result,  and  header 
call  result  **/ 


struct  query  br query; 
struct  timeval  timeout; 


/**  structure  to  hold  header  query  parameters  **/ 
/**  timevalue  structure  for  clnt  control  **/ 


/ /build  file  names  using  current  user  number 
strcpy (BRFILE,  "d:brow") ; 

strcat {BRFILE,  itoa (USER,  c_usernum,  10)  ); 
St rcat (BRFILE,  ".txt\0"); 


strcpy (HFILE,  "d:hdr"); 
strcat (HFILE,  itoa (USER, 
strcat (HFILE,  ".txt\0"); 


c usernum,  10)  ); 


strcpy (QFILE,  "d: query" ) ; 

strcat (QFILE,  itoa (USER,  c_usernum,  10) 

strcat (QFILE,  ".txt\0"); 


) ; 


switch (message) 

{ 

case  WM_INITDIALOG: 

//initialize  current  stat  structure 
init_current ( ) ; 

/ /increment  # of  browse  report  selections 
aggregate . tot_browse_report++; 

//store  start  browse  time 
current . start_browse  = time (NULL)  ; 

return  BLD_BrowseEntryDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 
switch (wParam) 
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/ 


/ 


ass 


{ 

case  IDOK: 

BrYear[0]  = 0; 

BrEIN[0]  = 0; 

BrEstab[0]  = 0; 

BrStart[0]  = 0;  //starting  MRN 

GetDlgltemText (hDlg, IDMF_BrYear, (LPSTR) BrYear, 5) ; /**  get  N+1  characters  ** 

GetDlgltemText (hDlg, IDMF_BrEIN, (LPSTR) BrEIN, 11) ; 

GetDlgltemText (hDlg, IDMF_BrEstab, (LPSTR) BrEstab, 5) ; 

GetDlgltemText (hDlg, IDMF_BrStart,  (LPSTR) BrStart,  12) ; 

if  (strcmp (BrYear,  "1991")  !=  0)  /**  validate  the  year  ** 

{ 

BLD_Year_ErrDlgFunc (hDlg, message, wParam,  IParam)  ; 
hYear  = GetDlgItem(hDlg,  IDMF_BrYear) ; 

SetFocus (hYear) ; 

} 

else  / /year  OK,  send  header  request 

{ 

usernum  = USER; 

/**  send  the  header  query  info  to  a file  and  let  the  server  know  **/ 
qf  = fopen(QFILE,  "wb"); 

if  (qf  ==  NULL)  //if  file  not  available  drop  out  of  all  if-else 

BLD_QueryTxtDlgFunc (hDlg, message, wParam, IParam)  ; 
else  //if  file  available  continue 

{ 

strcpy (brquery . Year,  BrYear); 

strcpy (brquery . EIN,  BrEIN) ; 

strcpy (brquery . Estab,  BrEstab); 

strcpy (brquery . seq_no,  DEF_SEQ_NO)  ; 

brquery . FName [ 0 ] = 0; 

brquery . LName C 0 ] = 0; 

brquery. SSN[0]  = 0; 

strcpy (brquery . of f set,  BrStart); 

fwrite (Sbrquery,  sizeof  (struct  query),  1,  qf ) ; 

f close (qf ) ; 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourgl 

ShowCursor  (TRUE);  //show  hourglass 

/**  clnt_create  is  one  step  down  from  a straight  rpc  call 

it  is  required  here  for  control  of  the  time  out  value  **/ 
clnt  = clnt_create (HOST,  GET_SEQ_HEADER,  VERSNUM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam)  ; 
else  //if  .error  file  available  continue 

{ 

fprintf(ef,  "\n%s\n",  "Browse,  Get  Seq  Header,  clnt_create") ; 
fprintf(ef,  "%s\n",  "CLIENT  HANDLE  IS  NULL") ; 
fprintf (ef , "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef , "%d  = T_ERRNO\n",  t_errno) ; 
f close (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam)  ; 

ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hYear  = GetDlgltem (hDlg, IDMF_BrYear) ; 

SetFocus (hYear) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  clnt  = NULL 
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/ 


) ; 


t)  ; 


else  /**  set  re-try  timeout  value  for  employer  header  request** 

{ 

timeout . tv_sec  = RETRY_TIME; 
timeout . tv_usec  = 0 ; 

ores  = clnt_control (clnt , CLSET_RETRY_TIMEOUT, (char  _TKFAR  *)&timeout 

if  (cres  ==  0) 

{ 

ef  = fopen{EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, iParam) ; 
else  //if  error  file  available  continue 
{ 

fprintf(ef,  "\n%s\n",  "Browse,  Get  Seq  Header,  clnt_control") ; 
fprintf(ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET") ; 
fclose (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 
SetCursor  (hCur) ; //reset  to  arrow 

hYear  = GetDlgItem(hDlg, IDMF_BrYear) ; 

SetFocus  (hYear) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  cres  = 0 

else  /**  set  total  timeout  & request  employer  header  info  **/ 

{ 

timeout . tv_sec  = TOT_TIME; 
timeout . tv_usec  = 0; 

brrpcres  = clnt_call (clnt, PROCNUM, (xdrproc_t ) xdr_int, 

(caddr_t) &usernum, (xdrproc_t ) xdr_int,  (caddr_t) &brres,  timeou 

if  ((brrpcres  !=  0)  | I (brres  !=  1))  /**  check  for  errors  **/ 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 
{ 

fprintf(ef,  "\n%s\n",  "Browse,  Get  Seq  Header,  clnt_call") ; 
fprintf (ef , "BrRPCRES  = %d\n",  brrpcres); 
fprintf(ef,  "BrRES  = %d\n",  brres); 
if  (brrpcres  !=  0)  /**  if  rpc  call  failed  **/ 

{ 

/**  rpc_createrr  is  a global  variable  returned  by  rpc_call 
and  relates  the  status  of  the  call  itself  **/ 

/**  t_errno  futher  delineates  the  error  in  certain  settings 

fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n\n",  t_errno) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam)  ; 
hYear  = GetDlgl tern (hDlg, IDMF_BrYear) ; 

SetFocus (hYear) ; 

} //end  of  rpc  call  failed 

else  //if  EIN  could  not  be  found  by  search' engine 

{ 

fprintf (ef,  "%s\n\n",  "SEARCH  ENGINE  COULD  NOT  FIND  EIN") ; 
BLD_EINErrDlgFunc (hDlg, message, wParam, IParam) ; 
hEIN  = GetDlgItem(hDlg, IDMF_BrEIN) ; 

SetFocus (hEIN) ; 

} / /end  of  incorrect  EIN 

fclose (ef ) ; 

} //end  of  if  ef  !=  NULL 
} //end  of  error  check 
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else  //Get  Header  complete,  request  browse  report 

{ 


/**  clnt_create  is  one  step  down  from  a straight  rpc  call 

it  is  required  here  for  control  of  the  time  out  value  **/ 
clnt  = clnt_create (HOST,  BROWSE_REPORT,  VERSNTJM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a")  ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 

{ 

fprintf (ef , "\n%s\n",  "Browse,  Browse  Report,  clnt_create")  ; 
fprintf(ef,  "%s\n",  "CLIENT  HANDLE  IS  NULL") ; 
fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n",  t_errno) ; 
f close (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam)  ; 

ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hYear  = GetDlgltem (hDlg, IDMF_BrYear) ; 

SetFocus (hYear) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  clnt  = NULL 

else  /**  set  re-try  timeout  value  for  browse  report  request**/ 

{ 

timeout . tv_sec  = RETRY_TIME; 
timeout . tv_usec  = 0; 

cres  = ■clnt_control (clnt,CLSET_RETRY_TIMEOUT, (char  _TKFAR  *)&t 

imeout) ; 

if  (cres  ==  0) 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 

{ 

fprintf  (ef,  "\n%s\n",  "Browse,  Browse  Report,  clnt_control 

")  ; 

fprintf (ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET"); 
f close (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hYear  = GetDlgltem (hDlg, IDMF_BrYear) ; 

SetFocus (hYear) ; 

} //end  of  ef  !=  NULL 
} / /end  of  if  cres  = 0 

else  /**  set  total  timeout  & request  browse  report  info 

**/ 

{ 

timeout .tv_sec  = TOT_TIME; 
timeout . tv_usec  = 0; 

brrpcres  = clnt_call (clnt , PROCNUM, (xdrproc_t ) xdr_int , 

(caddr_t ) &usernum, (xdrproc_t ) xdr_int,  (caddr_t) &brres,  ti 

meout) ; 

if  ((brrpcres  !=  0)  II  (brres  !=  1))  /**  check  for  erro 

rs  **/ 

{ 

ef  = fopen(EFILE,  "a"); 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam,  IParam)  ; 
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) ; 


call 


tings  **/ 


N" ) ; 


else  //if  error  file  available  continue 
{ 

fprintf (ef , "\n%s\n",  "Browse,  Browse  Report,  clnt_call" 

fprintf (ef , "BrRPCRES  = %d\n",  brrpcres) ; 
fprintf{ef,  "BrRES  = %d\n",  brres) ; 
if  (brrpcres  !=  0)  /**  if  rpc  call  failed  **/ 

{ 

/**  rpc_createrr  is  a global  variable  returned  by  rpc_ 

and  relates  the  status  of  the  call  itself  **/ 

/**  t_errno  futher  delineates  the  error  in  certain  set 

fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf  (ef,  "%d  = T_ERRNO\n\n",  t_errno); 
BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 
hYear  = GetDlgItem(hDlg, IDMF_BrYear) ; 

SetFocus (hYear) ; 

} //end  of  rpc  call  failed 
else  //if  MRN  could  not  be  found  by  search  engine 
{ 

fprintf (ef,  "%s\n\n",  "SEARCH  ENGINE  COULD  NOT  FIND  MR 

BLD_MRNErrDlgFunc (hDlg, message, wParam, IParam) ; 
hMRN  = GetDlgItem(hDlg, IDMF_BrStart) ; 

SetFocus (hMRN) ; 

} //end  of  incorrect  MRN 
f close  (ef ) ; 

} //end  of  if  ef  !=  NULL 
} / /end  of  error  check 

else  //parameters  sent  and  data  written 

{ 

EndDialog (hDlg, 1 ) ; 

hfil  = fopen(HFILE,  "rb") ; 

dfil  = fopen (BRFILE,  "rb") ; 

if  ( (dfil  ==  NULL)  I | (hfil  ==  NULL) ) 

BLD_MissingFileDlgFunc (hDlg, message, wParam, IParam) ; 
else 
{ ' 

fclose (dfil) ; 
fclose (hfil) ; 

BLD_BrowseReportDlgFunc  (hDlg, message,  wParam,  IParam)  ; 

} 

} //everything  executed  properly 
} //end  of  set  total  timeout  and  browse  report  request 
} //end  of  set  retry  timeout  for  browse  report  request 
} //end  of  get  header  complete,  request  browse  report  info 
} //end  of  set  total  timeout  and  request  header 
} //end  of  set  retry  timeout  for  get  header 
} //end  of  if  qf  !=  NULL 
} //end  of  year  OK,  send  header  request 

break;  //end  of  IDOK 


case  IDCANCEL: 

if  ( ! BLD_BrowseEntryDlgDef  ault  (hDlg, message,  wParam,  IParam)  ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 
default : 

return  BLD_BrowseEntryDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 
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break; 
default : 

return  BLD_BrowseEntryDlgDefault (hDlg, message, wParam,  iParam) ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  BROWSE  REPORT  ENTRY  SCREEN 


/*************************************************************************************/ 

/*  displays  browse  report  records  */ 

/*************************************************************************************/ 

int  BLD_BrowseReportDlgFunc (hWnd, message, wParam, IParam)  /*  Startup  procedure  for  modal  dia 
log  box  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 


IpProc  = MakeProcInstance ( (FARPROC) BLD_BrowseReportDigProc,  hinst)  ; 
ReturnValue  = DialogBox (hinst , (LPSTR) "BRREPORT",  MainhWnd,  IpProc); 
FreeProcInstance (IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, "BRREPORT", 


MB_OK  I MB_ICONHAND) 

return  ReturnValue; 

} 

BOOL  FAR  PASCAL  BLD_BrowseReportDlgProc (hDlg, 
procedure  */ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

char  BRFILE [14] , 

DFILE[14] , 

HFILE[14] , 

QFILE[13] ; 

char  c_usernum[3] ; 


char  ListBoxString[200] , 
recof fset  [30] ; 

CLIENT  _TKFAR  *clnt; 

FILE  *brfil,  *dfil,*hfil,  *ef,  *qf; 

HCURSOR  hCur; 

HWND  hLB; 

int  count; 

int  drpcres,  dres,  cres; 


sage,  wParam,  IParam)  /*  Modal  dialog  box 


/ /browse  file 
/ /detail  file 
//header  file 
/ /query  file 

//user  number  converted  to  character 
//for  concatenation  in  file  name 

/**  list  box  string  **/ 

/**  converted  record  offset  **/ 

/**  handle  to  client  **/ 

/**  pointer  to  a file  **/ 

/**  cursor  handle  **/ 

/**  handle  to  list  box  **/ 

/**  counter  **/ 

/**  rpc  call  result,  detail  call  result, 
and  clnt  control  result  **/ 
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int  index; 

/ * * 

int  tabs[]  = {52,72,84,123, 

162,197,243,297,427} 

int  usernum; 

/** 

long  int  Ibitems; 

/ * * 

long  num; 

/ * * 

struct  query  dc[uery; 

/ * * 

* * / 

struct  timeval  timeout; 

/ * * 

struct  W2Browse  *pBrowse; 

/ * * 

unsigned  long  offset; 

/ * * 

WORD  numtabs  = 9; 

/ * * 

/ * * 

index  of  list  box  entry  **/ 

/**  tab  settings  for  list  box  **/ 
user  number  **/ 

number  of  items  in  the  list  box  **/ 
was  anything  read  from  the  file  **/ 

structure  to  hold  detail  query  paramet 

timevalue  structure  for  clnt  control  * 


pointer  to  a structure  **/ 

holds  converted  record  location  **/ 


nximber  of  tabs  in  list  box  **/ 
added  6/19/92  by  LLD  **/ 


//build  file  names  using  current  user  number 
strcpy (BRFILE,  "d:brow") ; 

strcat (BRFILE,  itoa (USER,  c_usernum,  10)  ); 
strcat (BRFILE,  ".txt\0"); 


strcpy (DFILE,  "d:detl"); 

strcat  (DFILE,  itoa  (USER,  c_usern\im,  10)  ); 

strcat (DFILE,  ”.txt\0"); 

strcpy (HFILE,  "d:hdr") ; 

strcat  (HFILE,  itoa  (USER,  c_usernxim,  10)  ); 

strcat (HFILE,  ".txt\0”); 


strcpy (QFILE,  "d: query" ) ; 

strcat (QFILE,  itoa (USER,  c_usernum,  10)  ); 

strcat (QFILE,  ".txt\0"); 


switch (message) 

{ 

case  WM_INITDIALOG:  //file  availability  checked  in  BrowseEntry  dialog 

//before  this  dialog  is  initialized 


hfil  = fopen(HFILE,  "rb"); 

if  (hfil  ==  NULL)  //if  file  pointer  null  alert  user 

{ 

BLD_NULLPtrDlgFunc (hDlg, message, wParam, IParam) ; 

EndDialog (hDlg, 1 ) ; 
return  TRUE; 

} 

else  //if  file  availabe  continue 

{ 

f read(&CurrEmprInfo,  sizeof (struct  W2EmprInfo) , 1,  hfil) ; 
f close (hfil) ; 

CreateHeaderString ( ) ; 

SetDlgltemText (hDlg, ID_BrEmprHeader, Headerstring) ; 

SendDlgltemMessage (hDlg, IDLB_BrMatch, LB_SETHORIZONTALEXTENT, 1000, 0) ; 
SendDlgltemMessage (hDlg, IDLB_BrMatch, LB_SETTABSTOPS, numtabs, 

(LONG) (LPINT)tabs); 

//off count  = 0;  //initialize  counter  for  entries  in  list  box 
brfil  = fopen (BRFILE,  "rb") ; 
pBrowse  = SBrowse; 
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if  (brfil  =“  NULL)  //if  file  pointer  null  alert  user 

{ 

BLD_NULLPtrDlgFunc (hDlg, message, wParam, IParam) ; 
EndDialog (hDlg, 1) ; 
return  TRUE; 

} 

else  //if  file  available  continue 

{ 


for  (count=l;  count  <=  MAXBRLB;  count++)  /**  read  from  the  file  **/ 

{ 

//of f count ++;  //set  counter 

num  = f read (pBrowse,  sizeof (struct  W2Browse) , 1,  brfil); 


if (num  !=  0)  //if  file  contains  data  read 

{ 


offset  = pBrowse->record_loc [0]  ; 
offset  = offset«  8; 

offset  = offset  + pBrowse->record_loc [1] ; 
offset  = offset«8; 

offset  = offset  + pBrowse->record_loc [2] ; 
offset  = offset«8; 

offset  = offset  + pBrowse->record_loc [3] ; 


/**  convert  the  **/ 

/**  record  location  **/ 
/**  because  of  **/ 

/**  different  byte  **/ 
/**  ordering  on  **/ 

/**  the  SUN  **/ 


/**  display  the  browse  info  in  the  list  box  **/ 

ListBoxString[0]  = 0; 

sprint f (ListBoxString, "%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s". 
Browse .MRN, 

Browse . seq;_no. 

Browse . wage_type , 

Browse . AnnFICAWages , 

Browse . AnnFICATips , 

Browse . FICATaxWheld, 

Browse .AnnWgsTpsOther, 

Browse . EmpSSN, 

Browse . EmpName, 

ultoa  (offset , recoffset,  10)); 

SendDlgltemMessage (hDlg, IDLB_BrMatch, LB_ADDSTRING, 0 , 

(LONG) (LPSTR) ListBoxString) ; 

} //end  of  if  num  !=  0 

} //end  of  for  loop  - reading  from  the  file 


fclose  (brfil) ; 

SendDlgltemMessage (hDlg, IDLB_BrMatch, LB_SETCURSEL,  ■ (WPARAM) 0 , (LONG) 0 ) ; 
return  BLD_BrowseReportDlgDef ault (hDlg, message, wParam, IParam)  ; 

} //end  of  if  brfil  !=  NULL 
} //  end  of  if  hfil  !=  NULL 
break;  //end  of  WM  INITDIALOG 


case  WM_COMMAND: 
switch (wParam) 

{ 

case  IDOK:  /**  when  user  hits  return  inside  the  listbox  **/ 


* * / 


hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourglass 
ShowCursor  (TRUE);  //show  hourglass 

ListBoxString [ 0 ] = 0;  /**  use  index  to  get  string  then 

index  = (WORD)  SendDlgltemMessage (hDlg,  /**  parse  out  the  offset  **/ 

IDLB_BrMatch, LB_GETCURSEL, 0, 0) ; /**  and  the  sequence  number  **/ 

SendDlgltemMessage (hDlg, IDLB_BrMatch, LB_GETTEXT, 
index, (LONG) (LPSTR) ListBoxString) ; 
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strncpy (recof f set , ListBoxString  + 95, 
recof f set [29]  = 0; 

strncpy  (dquery . seq;_no,  ListBoxString  + 
dquery . seq_no [3]  = 0; 


29)  ; 

/**  terminate 
12,  3)  ; 

/**  terminate 


string  **/ 
string  **/ 


usernum  = USER; 

/**  send  the  detail  query  info  to  a file  and  let  the  server  know  **/ 
qf  = fopen(QFILE,  "wb") ; 

if  (qf  ==  NULL)  //if  file  not  available  drop  out  of  all  if-else 
BLD_QueryTxtDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  file  available  continue 

{ 

St rcpy (dquery .Year,  BrYear); 

St rcpy (dquery . EIN,  BrEIN) ; 

St rcpy (dquery .Estab,  BrEstab) ; 
dquery . FName [ 0 ] = 0; 
dquery. LName [0]  = 0; 
dquery . SSN [ 0]  =0; 

St rcpy (dquery . of f set , recof f set) ; 

fwrite (&dquery,  sizeof (struct  query),  1,  qf ) ; 

f close (qf ) ; 

/**  clnt_create  is  one  step  down  from  a straight  rpc  call 

it  is  required  here  for  control  of  the  time  out  value  **/ 
clnt  = clnt_create (HOST,  GET_EMPL_DETAIL,  VERSNUM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a")  ; 

if  (ef  =*=  NULL)  //if  error  file  not  avaiable  alert  user 
•'  BLD__ErrorFileDlgFunc  (hDlg;message,wParam,  IParam)  ; 
else  //if  error  file  available  continue 

{ 

fprintf (ef , ''\n%s\n",  "Browse,  Get_Empl_Detail,  clnt_create" ) ; 

fprintf(ef,  "%s\n",  "CLIENT  HANDLE  IS  NULL"); 

fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 

fprintf  (ef,  "%d  = T__ERRNO\n",  t_errno)  ; 

fclose (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_BrMatch) ; 

Set Focus (hLB) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  clnt  = NULL 

else  /**  set  re-try  timeout  value  **/ 

{ 

timeout . tv_sec  = RETRY_TIME; 
timeout . tv_usec  = 0; 

cres  = clnt_control (clnt , CLSET_RETRY_TIMEOUT, (char  _TKFAR  *)&timeout) 
if  (cres  ==  0) 

{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam)  ; 
else  //if  error  file  available  continue 

{ 

fprintf (ef,  "\n%s\n",  "Browse,  Get_Empl_Detail,  clnt_control") ; 
fprintf (ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET"); 
fclose (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

arrow 
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SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  ores  = 0 

else  /**  set  total  timeout  & request  employee  detail  **/ 

{ 

timeout . tv_sec  = TOT_TIME; 
timeout . tv_usec  = 0; 

drpcres  = clnt_call (clnt , PROCNUM, (xdrproc_t ) xdr_int , 

(caddr_t) Susernum,  (xdrproc_t ) xdr_int , 
(caddr_t) &dres,  timeout) ; 

clnt_destroy (clnt) ; 

if  ({drpcres  !=  0)  II  (dres  !=  1)) 

{ 

ef  = fopen(EFILE,  "a"); 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, iParam) ; 

•else  //if  error  file  available  continue 


"\n%s\n",  "Browse,  Get_Empl_Detail,  clnt_call") 
"%d  = DRPCRESXn",  drpcres  ); 

DRES\n\n",  dres) ; 

RPC  ERROR\n",  rpc_createerr) ; 

T ERRNOXn",  t errno) ; 


"%d 
"%d 
"s^d  = 


} 


fprintf (ef , 
fprintf (ef , 
fprintf (ef , 
fprintf (ef , 
fprintf (ef , 
f close (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 
ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgI tern (hDlg,  IDLB_BrMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
//end  of  error  check  on  drpcres  and  dres 

//parameters,  communications  & data  verified 


else 

{ 

dfil  = fopen{DFILE, 
if  (dfil  ==  NULL) 

{ 


'rb") ; /**  open  the  detail  file  **/ 

//check  file  ptr 


BLD_DFileErrDlgFunc (hDlg, message, wParam, IParam) ; 
ShowCursor (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem (hDlg, IDLB_BrMatch) ; 

SetFocus  (hLB) ; 


} 

else 

{ /**  read  in  employee  detail  info  **/ 

f read (SEDetail,  sizeof (struct  W2EmpInfo) , 1,  dfil) ; 
f close (dfil) ; 

CreateEDetail () ; 

BLD_EmployeeDetailDlgFunc (hDlg, message, wParam, IParam) ; 
ShowCursor (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_BrMatch) ; 

SetFocus (hLB) ; 


} 

} //everything  executed  properly 
} //end  of  set  total  timeout 
} //end  of  set  re-try  timeout  value 
} //end  of  qf  !=  NULL 
break;  //end  of  IDOK 


case  IDCANCEL: 

if  (! BLD_BrowseReportDlgDefault (hDlg, message, wParam,  IParam)  ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 
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case  IDLB_BrMatch:  /**  when  user  double  clicks  inside  the  listbox  **/ 

if  (HIWORD (IParam) ==LBN_DBLCLK) 

{ 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourglass 
ShowCursor  (TRUE);  //show  hourglass 


**/ 


ListBoxStringCO]  = 0;  /**  use  index  to  get  string  then 

index  = (WORD)  SendDlgltemMessage (hDlg,  /**  parse  out  the  offset  **/ 

IDLB_BrMatch, LB_GETCURSEL, 0 , 0 ) ; /**  and  the  sequence  number  **/ 

SendDlgltemMessage (hDlg, IDLB_BrMatch, LB_GETTEXT, 
index, (LONG) (LPSTR)ListBoxString); 
strncpy (recoffset,  ListBoxString  + 95,  29); 

recof f set  [29]  = 0;  /**  teirminate  string  **/ 

strncpy (dquery. seq_no,  ListBoxString  + 12,  3); 

dquery . seq_no [3]  =0;  /**  terminate  string  **/ 

usernum  = USER; 

/**  send  the  detail  query  info  to  a file  and  let  the  server  know  **/ 
qf  = fopen(QFILE,  "wb") ; 

if  (qf  ==  NULL)  //if  file  not  available  drop  out  of  all  if-else 
BLD_QueryTxtDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  file  available  continue 

{ 

strcpy (dquery .Year,  BrYear); 

strcpy  (dquery . EIN,  BrEIN)  ;. 

strcpy (dquery . Estab,  BrEstab); 

dquery. FName[0]  = 0; 

dquery . LName [0]  = 0; 

dquery . SSN[0]  = 0; 

strcpy (dquery . of f set,  recoffset) ; 

f write (Sdquery,  sizeof (struct  query),  1,  qf ) ; 

f close (qf ) ; 

/**  clnt_create  is  one  step  down  from  a straight  rpc  call 

it  is  required  here  for  control  of  the  time  out  value  **/ 
clnt  = clnt_create (HOST,  GET_EMPL_DETAIL,  VERSNUM,  UDP) ; 
if(clnt  ==  NULL) 

{ 

ef  = fopen(EFILE,  "a"); 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 

{ 

fprintf (ef , "\n%s\n”,  "Browse,  Get_Empl_Detail,  clnt_create") ; 
fprintf(ef,  "%s\n",  "CLIENT  HANDLE  IS  NULL") ; 
fprintf (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n",  t_errno) ; 
f close (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem(hDlg,  IDLB_BrMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
} //end  of  if  clnt  = NULL 
else  /**  set  re-try  timeout  value  **/ 

{ 

timeout . tv_sec  = RETRY_TIME; 
timeout . tv_usec  = 0; 

cres  = clnt  control (clnt , CLSET  RETRY  TIMEOUT, (char  TKFAR  *)&timeout); 
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if  (cres  ==  0) 

{ 

ef  = fopen{EFILE,  "a"); 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, iParam)  ; 
else  //if  error  file  available  continue 


{ 

fprintf (ef , "\n%s\n",  "Browse,  Get_Empl_Detail,  clnt_control") 
fprintf(ef,  "%s\n\n",  "RE-TRY  TIMEOUT  WAS  NOT  SET"); 
f close (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgI tern (hDlg,  IDLB_BrMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 
} / /end  of  if  cres  = 0 

else  /**  set  total  timeout  & request  employe  detail  info**/ 

{ 

timeout . tv_sec  = TOT_TIME; 
timeout . tv_usec  = 0; 

drpcres  = clnt_call (clnt, PROCNUM, (xdrproc_t) xdr_int , 

(caddr_t)  &usern\im,  (xdrproc_t ) xdr_int , 
(caddr_t) Sdres,  timeout) ; 

clnt_destroy (clnt) ; 

if  ((drpcres  !=  0)  ||  (dres  !=  1)) 

{ 


ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable-  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  error  file  available  continue 


{ 


"\n%s\n",  "Browse,  Get_Empl_Detail,  clnt_call") ; 
"%d  = DRPCRES\n",  drpcres  ) ; 

DRES\n\n",  dres) / 

RPC  ERROR\n",  rpc_createerr) ; 

T ERRNO\n\n",  t errno) ; 


"%d 

"%d 

»« — 


d = 


fprintf (ef , 
fprintf (ef , 
fprintf (ef , 
fprintf (ef , 
fprintf (ef , 
fclose  (ef ) ; 

BLD_QueryErrDlgFunc (hDlg, message, wParam, IParam) ; 
ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem (hDlg,  IDLB_BrMatch) ; 

SetFocus (hLB) ; 

} //end  of  ef  !=  NULL 

} //end  of  error  check  on  dprcres  and  dres 
else  //parameters,  communications  & data  verified 


{ 


dfil  = fopen(DFILE,  "rb") ; 
if  (dfil  ==  NULL) 

{ 


/**  open  the  detail  file  **/ 
//check  file  ptr 


BLD_DFileErrDlgFunc (hDlg, message, wParam, IParam) ; 
ShowCursor (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgItem (hDlg, IDLB_BrMatch) ; 

SetFocus (hLB) ; 


} 

else 


{ /**  read  in  employe  info  **/ 

f read (&EDetail,  sizeof (struct  W2EmpInfo) , 1,  dfil); 
fclose (dfil) ; 

CreateEDetail  () ; 

BLD_EmployeeDetailDlgFunc (hDlg, message, wParam, IParam) ; 
ShowCursor (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 
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hLB=GetDlgItem(hDlg,  IDLB_BrMatch) ; 

SetFocus (hLB) ; 

} 

} //everything  executed  properly 
} //end  of  set  total  timeout 
} //end  of  set  re-try  timeout  value 
} //end  of  qf  !=  NULL 
} //end  of  if  doiible-clicked 
break;  //end  of  IDLB_BrMatch 

case  ID_CLOSE: 

current . stop_browse  = time (NULL) ; //store  browse  report  stop  time 
fill_current ( ) ; //calculate  net  browse  report  time 

f ill_aggregate { ) ; //adjust  browse  totals  and  averages 

write_aggregate (hDlg, message, wParam, IParam) ; //write  aggregate  stats  to  file 
EndDialog (hDlg, ID_CLOSE) ; 
break; 

case  ID_BrAddRec:  //when  user  selects  additional  records 

//file  availability  previously  checked 

aggregate . tot_add_records++;  //increment  stats  for  add  records 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourglass 

ShowCursor  (TRUE) ; //show  hourglass 

Ibitems  = SendDlgltemMessage (hDlg, IDLB_BrMatch, LB_GETCOUNT, 0,0) ; 

brfil  = fopen (BRFILE,  "rb”) ; 
if  '(brfil  ==  NULL) 

{ 

BLD_DataErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB=GetDlgI tern (hDlg,  IDLB_BrMatch) ; 

SetFocus (hLB) ; 

} 

else 

{ 

pBrowse  = SBrowse; 

fseek (brfil,  sizeof  (struct  W2Browse) *lbitems,  0);  //position  file  pointer 

for  (count=l;  count  <=MAXBRLB;  count++)  /**  read  from  the  file  **/ 

{ 

num  = f read (pBrowse,  sizeof (struct  W2Browse) , 1,  brfil); 

if (num  !=  0)  //if  not  EOF 

{ 


offset  = pBrowse->record_loc [0] ; 
offset  = offset«  8; 

offset  = offset  + pBrowse->record_loc [1] ; 
offset  = offset«8; 

offset  = offset  + pBrowse->record_loc [2] ; 
offset  = offset«8; 

offset  = offset  + pBrowse->record_loc [3] ; 


/**  convert  the  **/ 

/**  offset  **/ 

/**  because  of  **/ 

/**  different  byte  **/ 
/**  ordering  on  **/ 

/**  the  SUN  **/ 


/**  display  the  browse  info  in  the  list  box  **/ 

ListBoxString[0]  = 0; 

sprint f (ListBoxString, "%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s". 
Browse .MRN, 

Browse . seq_no. 

Browse . wage_type , 

Browse .AnnFICAWages, 
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ror 


Browse . AnnFICATips , 

Browse . FICATaxWheld, 

Browse -AnnWgsTpsOther, 

Browse . EmpSSN, 

Browse  - EmpName, 

ultoa (of f set , recoffset,  10)); 
if  ( (SendDlgltemMessage (hDlg, IDLB_BrMatch, LB_ADDSTRING, 0, 

(LONG) (LPSTR) ListBoxString) ) ==  LB_ERRSPACE) 

{ 

aggregate. tot_add_records  — ; //adjust  count  when  listbox  full 
count  = MAXBRLB  + 1;  //and  user  presses  add_records  in  er 


} 

} //end  of  if  not  EOF 
} //end  of  for  loop 
f close (brf il) ; 

} //end  of  if  brfil  !=  NULL 
ShowCursor  (FALSE);  //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hLB  = GetDlgltem (hDlg, IDLB_BrMatch) ; 

SetFocus (hLB) ; 

SendDlgltemMessage (hDlg, IDLB_BrMatch, LB_SETCURSEL, 
(WORD) Ibitems, (LONG) 0) ; 
brea)c;  //end  of  ID  BrAddRec 


default : 

return  BLD_BrowseReportDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 


default : 

return  BLD_BrowseReportDlgDef ault (hDlg, message, wParam,  IParam)  ; 
break; 


} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  DISPLAY  BROWSE  REPORT  RECORDS  DIALOG 


/**★***********************************************************************************/ 

/*  prompts  user  to  enter  "printing  report"  info  */ 

/**************************************************************************************/ 

int  BLD_PrintDlgFunc (hWnd, message, wParam, IParam)  /*  Startup  procedure  for  modal  dialog  box 
*/ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance (BLD_PrintDlgProc, hinst ) ; 

ReturnValue  = DialogBox (hinst,  (LPSTR) "PRINT" , hWnd,  IpProc); 

FreeProcInstance (IpProc)  ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, "PRINT", 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 
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BOOL  FAR  PASCAL  BLD_PrintDlgProc (hDlg,  message,  wParam,  iParam)  /*  Modal  dialog  box  proced 
ure  */ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 


*/ 


char  QFILE[13]; 
char  c_usernum[3] ; 

FILE  *qf,  *ef; 

HOURS OR  hCur; 

HWND  hEIN,  hYear; 

HWND  hPW; 

int  usernum,  p2rpcres,  pres; 


//query  file 

//user  nvimber  converted  to  character 
//for  concatenation  in  file  name 

/**  pointer  to  query  file  and  error  file**/ 

/**  cursor  handle  **/ 

/**  handle  to  IDMF_PEIN  and  IDMF_PYear  **/ 

/**  handle  to  IDMF_Password  child  window  **/ 

/**  user  number,  rpc  call  result,  and  header  call  result  * 


struct  query  pquery; 


/**  structure  to  hold  header  query  parameters  **/ 


//build  file  name  using  current  user  number 
strcpy (QFILE,  ”d : query" ) ; 

strcat  (QFILE,  itoa  (USER,  c_usern\am,  10)  ); 

strcat (QFILE,  ".txt\0"); 


switch (message) 

{ 

case  WM_INITDIALOG: 

//increment  # of  times  print  report  selected 
aggregate . tot_print_report++; 

return  BLD_PrintDlgDefault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 
switch (wParam) 

{ 

case  IDOK: 

PW[0]  = 0; 

PYear[0]  = 0; 

PEIN[0]  = 0; 

PEstab[0]  = 0; 

PSeq[0]  = 0; 

GetDlgltemText (hDlg, IDMF_Pas sword, (LPSTR) PW, 6) ; 

GetDlgltemText (hDlg, IDMF_PYear, (LPSTR) PYear, 5) ; /**  get  N+1  characters  ** 

GetDlgltemText (hDlg, IDMF_PEIN, (LPSTR) PEIN, 11) ; 

GetDlgltemText (hDlg, IDMF_PEstab, (LPSTR) PEstab, 5) ; 

GetDlgltemText (hDlg, IDMF_PSeq, (LPSTR) PSeq, 4) ; 

if  (( St rcmp (PASSWORD,  PW) ) !=  0)  //check  password 

{ 

BLD_PWErrDlgFunc (hDlg, message, wParam, IParam) ; 
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hPW  = GetDlgItem(hDlg,  IDMF_Password) ; 

SetFocus (hPW) ; 

} 

else  //password  OK,  check  year 

if  (strcmp (PYear,  "1991")  !=  0) 

{ 

BLD_Year_ErrDlgFunc (hDlg, message, wParam, IParam) ; 
hYear  = GetDlgItem(hDlg, IDMF_PYear) ; 

SetFocus (hYear) ; 

} 

else  / /year  OK,  get  header  info 

{ 

usernum  = USER; 

/**  send  the  header  query  info  to  a file  and  let  the  server  know  **/ 
qf  = fopen(QFILE,  "wb"); 

if  (qf  ==  NULL)  //if  file  not  available  drop  out  of  all  if-else 

BLD_QueryTxtDlgFunc (hDlg, message, wParam, IParam) ; 
else  //if  file  available  continue 

{ 

hCur  = SetCursor  (LoadCursor  (NULL,  IDC_WAIT) ) ; //change  to  hourglas 
s 

ShowCursor  (TRUE);  //show  hourglass 

strcpy (pquery . Year,  PYear); 

strcpy (pquery .EIN,  PEIN); 

strcpy (pquery . Estab,  PEstab); 

strcpy (pquery . seq_no,  PSeq); 

pquery . FName [ 0 ] = 0; 

pque  ry . LName [ 0 ] = 0 ; 

pquery . SSN[0]  = 0; 

pquery. offset [0]  = 0; 

f write (Spquery,  sizeof  (struct  query),  1,  qf ) ; 
fclose (qf ) ; 

prpcres  = rpc_call (HOST, PRINT_REPORT, VERSNUM, 

PROCNUM, (xdrproc_t ) xdr_int , 

(char  _TKFAR  *)&usernum,  (xdrproc_t ) xdr_int,  (char  _TKFAR  *)&pres," 

visible") ; 

if  ((prpcres  !=  0)  I I (pres  !=  1))  //check  for  errors 
{ 

ef  = fopen(EFILE,  "a") ; 

if  (ef  ==  NULL)  //if  error  file  not  avaiable  alert  user 
BLD_ErrorFileDlgFunc (hDlg, message, wParam, IParam) ; 
else  / /if  error  file  available  continue 

{ 

fprintf (ef , "\n%s\n",  "Print,  Print  Report,  rpc_call") ; 
fprintf  (ef , "%d  = PRPCRES\n",  prpcres); 
fprintf (ef,  "%d  = PRES\n",  pres) ; 
if  (prpcres  !=  0)  //if  rpc  call  fails 

{ 

/**  rpc_createerr  is  a global  variable  returned  by 

rpc_call  and  relates  the  status  of  the  call  itself  **/ 

/**  t_errno  further  delineates  the  error  in  certain 
settings  **/ 

fprintf  (ef,  "%d  = RPC  ERROR\n",  rpc_createerr) ; 
fprintf (ef,  "%d  = T_ERRNO\n\n",  t_errno) ; 

BLD_SysErrDlgFunc (hDlg, message, wParam, IParam) ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hPW  = GetDlgItem(hDlg,  IDMF_Pas sword) ; 

SetFocus (hPW) ; 

} 

else  //if  EIN  or  seq  no.  could  not  be  found 

{ 

fprintf (ef,  "%s\n",  "SEARCH  ENGINE  COULD  NOT  FIND  EIN  or  SEQ.  N 
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fprintf(ef,  "%s\n\n",  "OR  REPORT  CONTAINS  MORE  THAN  5000  EMPLOY 

EES") ; 

BLD_EINorSeqErrDlgFunc (hDlg, message, wParam, IParam)  ; 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

hEIN  = GetDlgItem(hDlg, IDMF_PEIN) ; 

SetFocus (hEIN) ; 

} 

fclose (ef ) ; 

} //end  of  if  rpc  call  fails 
} //end  of  ef  !=  NULL 

else  / /everything  OK,  print  report 

{ 

ShowCursor  (FALSE) ; //hide  hourglass 

SetCursor  (hCur) ; //reset  to  arrow 

EndDialog (hDlg, 1 ) ; 

aggregate . tot_pr_report++;  //increment  # of  times  report  printed 

//write  aggregate  stats  to  file 
write_aggregate (hDlg, message, wParam, IParam) ; 

BLD_Function5DlgFunc (hDlg, message, wParam, IParam) ; 

} 

} //end  of  if  qf  !=  NULL 
} //end  of  year  OK,  get  header  info 
break;  //  end  of  IDOK 


case  IDCANCEL: 

if  ( !BLD_PrintDlgDefault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_PrintDlgDefault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_PrintDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  PRINT  REPORT  ENTRY  SCREEN 


/**********★**************************************************************************/ 

/*  displays  EXIT  dialog  box  */ 

/**********★**************************************************************************/ 

int  BLD_Function2DlgFunc (hWnd, message, wParam, IParam)  /*  Startup  procedure  for  modal  dialog 
box  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance (BLD_Function2DlgProc, hinst ) ; 

ReturnValue  = DialogBox (hinst , (LPSTR) "EXIT" , hWnd,  IpProc); 

FreeProcInstance (IpProc) ; 
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if  (ReturnValue==-l ) 

BLDDisplayMessage {hWnd, BLD_CannotCreate, "EXIT", 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 

BOOL  FAR  PASCAL  BLD_Function2DlgProc (hDlg,  message,  wParam,  IParam)  /*  Modal  dialog  box  pr 
ocedure  */ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

switch (message) 

{ 

case  WM_INITDIALOG: 

return  BLD_Function2DlgDefault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 
switch (wParam) 

{ 

case  IDOK: 

if  ( ! BLD_Function2DlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK)  ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_Function2DlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 
default : 

return  BLD_Function2DlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_Function2DlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  EXIT  DIALOG 


//  DETAIL  DISPLAY  FUNCTIONS 

/**************************************************************■***********************/ 

/*  displays  employee  detail  */ 

/**************************************************************************************/ 

int  BLD_EmployeeDetailDlgFunc (hWnd, message, wParam, IParam)  /*  Startup  procedure  for  modal  d 
ialog  box  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance ( (FARPROC) BLD_EmployeeDetailDlgProc, hinst) ; 
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ReturnValue  = DialogBox (hinst , (LPSTR) "EDETAIL",  hWnd,  IpProc) ; 

FreeProcInstance (IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, "EDETAIL", 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 

BOOL  FAR  PASCAL  BLD_EmployeeDetailDlgProc (hDlg,  message,  wParam,  IParam)  /*  Modal  dialog  b 
ox  procedure  */ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

int  num;  /**  number  of  copies  to  be  printed  **/ 


switch (message) 

{ 

case  WM_INITDIALOG: 

//increment  # of  times  employee  detail  selected 
aggregate . tot_ee_detail++; 

SetDlgltemText (hDlg, ID_EDetail, EDetailString) ; 

return  BLD_EmployeeDetailDlgDef ault (hDlg,message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 
switch (wParam) 

{ 

case  IDOK: 

if  ( ! BLD_EmployeeDetailDlgDefault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( ! BLD_EmployeeDetailDlgDefault (hDlg, message, wParam, IParam) ) 
EndDialog (hDlg, IDCANCEL) ; 
break; 

•case  IDPRINTED: 

//increment  # of  times  print  employee  detail  selected 
aggregate . tot_pr_ee_detail-(-+; 

BLD_GetNumCopyDlgFunc  (hDlg, message,  wParam,  IParam)  ; 
num  = atoi (cnum) ; 

//increment  # of  details  printed 

aggregate.  tot_ee_det_printed  = aggregate . tot_ee__det_printed  + num; 
CreatePrintEDetail () ; 

EndDialog (hDlg, IDPRINTED) ; //end  current  dialog 
BLD_PrintEmpDetailDlgFunc (hDlg, message, wParam, IParam) ; 
break; 
default : 

return  BLD_EmployeeDetailDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_EmployeeDetailDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 
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} //END  OF  DISPLAY  EMPLOYEE  DETAIL  DIALOG 


/****************************************************★********************************/ 

/*  displays  header  detail  info  */ 

/**************************************************************************************/ 

int  BLD_HeaderDetailDlgFunc (hWnd, message, wParam, iParam)  /*  Startup  procedure  for  modal  dia 
log  box  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IP a ram; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance ( (FARPROC) BLD_HeaderDetailDlgProc,  hinst) ; 

ReturnValue  = DialogBox (hinst , (LPSTR) "HDETAIL",  hWnd,  IpProc); 

FreeProcInstance (IpProc) ; 
if  (ReturnValue==-l ) 

BLDDisplayMessage (hWnd, BLD_Cannot Create, "HDETAIL", 

MB_OK  I MB_ICONHAND ) ; 

return  ReturnValue; 

} 

BOOL  FAR  PASCAL  BLD_HeaderDetailDlgProc (hDlg,  message,  wParam,  IParam)  /*  Modal  dialog  box 
procedure  */ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 


switch (message) 

{ 

case  WM_INITDIALOG: 

//increment  # of  times  employer  detail  selected 
aggregate . tot_er_detail++; 

CreateHDetailString ( ) ; 

SetDlgltemText (hDlg, ID_HDetail, HDetailSt ring) ; 

return  BLD_HeaderDetailDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 
switch (wParam) 

{ 

case  IDOK: 

if  ( !BLD_HeaderDetailDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  (! BLD_HeaderDetailDlgDef ault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

case  IDPRINTHD: 

aggregate . tot_pr_er_detail++;  //increment  # of  times  empr.  det.  printed 
EndDialog (hDlg, IDPRINTHD)  ; 
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BLD_PrintHeaderDetailDlgFunc (hDlg, message , wParam, IParam) ; 
break; 

default : 

return  BLD_HeaderDetailDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

break; 
default : 

return  BLD_HeaderDetailDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  DISPLAY  HEADER  DETAIL  DIALOG 


/*********★*********************************★********************************★****/ 

/*  displays  report  totals  */ 

/*********************************************************************************/ 

int  BLD_ReportTotalsDlgFunc (hWnd, message, wParam, IParam)  /*  Startup  procedure  for  modal  dia 
log  box  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

FARPROC  IpProc; 
int  ReturnValue; 

IpProc  = MakeProcInstance ( (FARPROC) BLD_ReportTotalsDlgProc,  hinst) ; 

ReturnValue  = DialogBox (hinst,  (LPSTR) "TOTALS",  hWnd,  IpProc); 

FreeProcInstance (IpProc) ; 
if  (ReturnValue==-l) 

BLDDisplayMessage (hWnd, BLD_CannotCreate, "TOTALS", 

MB_OK  I MB_ICONHAND) ; 

return  ReturnValue; 

} 

BOOL  FAR  PASCAL  BLD_ReportTotalsDlgProc (hDlg,  message,  wParam,  IParam)  /*  Modal  dialog  box 
procedure  */ 

HWND  hDlg; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

char  EINstr[20],  RPTstr[14];  //strings  for  displaying  EIN  and  Report  Number 


switch (message) 

{ 

case  WM_INITDIALOG: 

/ /increment  # of  times  report  totals  selected 
aggregate . t ot_f inal++ ; 

CreateTotalString ( ) ; 

SetDlgltemText (hDlg, ID_Tot, Totalstring) ; 
strcpy (EINstr,  "EIN:  ") ; 
strcat (EINstr,  CurrEmprInfo . EIN) ; 
SetDlgltemText (hDlg, ID_TotEIN,  EINstr) ; 
strcpy (RPTstr,  "RPT-NO:  "); 


usercoda . c 


Wed  Mar  2 14:14:17  1994 


53 


strcat (RPTstr,  CurrEmprInf o . seq_no) ; 

SetDlgltemText (hDlg, ID_TotRpt,  RPTstr) ; 

return  BLD_ReportTotalsDlgDefault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND : 
switch (wParam) 

{ 

case  IDPRINTTOT: 

aggregate . tot_pr_final++;  //increment  # of  times  print  final  totals  sele 

cted 

EndDialog (hDlg, IDPRINTTOT) ; 

BLD_TotNowPrintDlgFunc (hDlg, message, wParam, iParam) ; 
break; 

case  IDOK: 

if  (! BLD_ReportTotalsDlgDefault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  (! BLD_ReportTotalsDlgDefault (hDlg, message, wParam, IParam)  ) 

EndDialog (hDlg, IDCANCEL)  ; 
break; 

default : 

return  BLD_ReportTotalsDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

: } • ‘ • - 
break; 

default : 

return  BLD_ReportTotalsDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;/*  Did  process  the  message  */ 

} //END  OF  DISPLAY  REPORT  TOTALS  DIALOG 


//  MISCELLANEOUS  FUNCTIONS  AND  DIALOGS 

/*******************************•**********************************/ 
/*  initialization  for  magic  fields  */ 

/******************************************************************/ 


BOOL  BLD_ApplicationAppInit (hinst, hPrev,pCmdShow, IpCmd)  /*  Initialization  for  application 
*/ 


HANDLE  hinst; 
HANDLE  hPrev; 
int  *pCmdShow; 
LPSTR  IpCmd; 


/*  Handle  to  this  application  instance.  */ 

/*  Handle  to  previous  instance  of  application.  */ 

/*  Pointer  to  variable  that  specifies  how  main  window  is  to  be  shown.  */ 
/*  Long  pointer  to  the  command  line.  */ 


ifdhPrev)  Mf  InitMFEDIT  ( ) ; 
return  TRUE; 

} //END  OF  MAGIC  FIELDS  INITIALIZATION 


/******************************************************************/ 
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/*  quits  the  application  */ 

/**★*************★*************************************************/ 

BOOL  BLD_QuitFuncUDCFunc (hWnd, message, wParam, IParam)  /*  User  Defined  Code  */ 

HWND  hWnd; 

UINT  message; 

WPARAM  wParam; 

LONG  IParam; 

{ 

write_aggregate (hWnd, message, wParam, IParam) ; //write  aggregate  stats  to  file 
PostQuitMessage (0) ; 
return  TRUE; 

} //END  OF  QUIT  APPLICATION  FUNCTION 


//  appears  when  user  presses  arrow  icon  to  change  employer  header 

II  ************************************************************** 

//  Modal  Dialog  Box:  SEQ 

II  ************************************************************** 

II  Startup  procedure  for  modal  dialog  box 

int  BLD_SequenceDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_SequenceDlgFuncDef (hWnd, (char  *)NULL); 

} . ■ ’ • 


/ / Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_SequenceDlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message) 

{ 

case  WM_INITDIALOG: 

SetDlgltemText (hDlg, ID_SeqNo,  sequence) ; 

return  BLD_SequenceDlgDefault (hDlg, message, wParam,  IParam)  ; 
break; 

case  WM_COMMAND : 

wId=LOWORD (wParam)  ; 
switch (wId) 

{ 

case  IDOK: 

GetDlgltemText (hDlg, ID_SeqNo, (LPSTR) sequence, 4) ; /**  get  N+1  char  **/ 

EndDialog (hDlg, IDOK) ; 

break; 

case  IDCANCEL: 

if  ( ! BLD_SequenceDlgDef ault (hDlg,message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_SequenceDlgDef ault (hDlg, message, wParam,  IParam) ; 
break; 

} 

break; 


default : 
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return  BLD_SequenceDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 

} //end  of  get  new  sequence  number  to  change  employer  header 


//  appears  when  user  presses  the  QP  icon  in  single  query 
//  displays  the  most  recently  entered  query  parameters 

II  ************************************************************** 

II  Modal  Dialog  Box:  QPARAM 

II  ************************************************************** 

/ / Startup  procedure  for  modal  dialog  box 

int  BLD_qparamDlgFunc (HWND  hWnd,UINT  message, WP ARAM  wParam, LPARAM  iParam) 

{ 

return  BLD_qparamDlgFuncDef (hWnd, (char  *)NULL); 

} 


/ / Modal  dialog  box  procedure 

BOOL  CALLBACK  BLD_qparamDlgProc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

WORD  wid; 

switch (message)  ■ ‘ • 

{ 

case  WM_INITDIALOG: 

//increment  # of  times  qparam  is  selected 
aggregate . tot_qp++; 


J-  / t 


SetDlglterciText  (hDlg^  qp_year,  

SetDlgltemText (hDlg,  qp_ein,  QEIN) ; 
if  ( strlen (QEstab)  !=  0 ) 

SetDlgltemText (hDlg,  qp_estab,  QEstab) ; 
else 

SetDlgltemText (hDlg,  qp_estab,  "NONE\0") ; 
if  ( strlen (LName)  !=  0 ) 

SetDlgltemText (hDlg,  qp_lname,  LName) ; 
else 

SetDlgltemText (hDlg,  qp_lname,  "NONE\0") ; 
if  ( strlen (FName)  !=  0 ) 

SetDlgltemText (hDlg,  qp_fname,  FName) ; 
else 

SetDlgltemText (hDlg,  qp_fname,  "NONE\0") ; 


if  ( strlen (QSSN)  !=  0 ) 

SetDlgltemText (hDlg,  qp_ssn,  QSSN) ; 
else 

SetDlgltemText (hDlg,  qp_ssn,  "NONE\0"); 
return  BLD_qparamDlgDefault (hDlg, message, wParam, IParam) ; 
break; 


case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wId) 

{ 

case  IDOK: 

EndDialog (hDlg, IDOK)  ; 
break; 


case  IDCANCEL: 
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if  (!  BLD_qparamDlgDefault  (hDlg, message,  wParam,  IParam)  ) 
EndDialog(hDlg, IDCANCEL) ; 
break; 

default : 

return  BLD_qparainDlgDef ault (hDlg, message,  wParam,  IParam)  ; 
break; 

} 

break; 
default : 

return  BLD_qparamDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;//  Did  process  the  message 

} 


II  ************************************************ ******* ******* 

//  Modal  Dialog  Box:  QUESTION 

II  ************************************************************** 

//  Startup  procedure  for  modal  dialog  box 

int  BLD_questDlgFunc (HWND  hWnd,UINT  message, WPARAM  wParam, LPARAM  IParam) 

{ 

return  BLD_questDlgFuncDef (hWnd, (char  *)NULL); 

} 


//  Modal  dialog  box  procedure  • 

BOOL  CALLBACK  BLD_questDlgP roc (HWND  hDlg,UINT  message, WPARAM  wParam, LPARAM  IParam) 
{ 


HWND 

QIY,  Q2N; 

//handles 

to  radio  buttons 

UINT 

check; 

/ /whether 

radio  button  is  checked,  0 = no,  1 = yes 

WORD 

wId; 

switch (message) 

{ 

case  WM  INITDIALOG: 


QIY  = GetDlgItem(hDlg,  ID_QlYes) ; //default  for  question  1 is  Yes 

Q2N  = GetDlgltem (hDlg,  ID_Q2No) ; //default  for  question  2 is  No 

SendMes sage (QIY,  BM_SETCHECK,  1,  OL)  ; 

SendMessage (Q2N,  BM_SETCHECK,  1,  OL)  ; 

return  BLD_questDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

case  WM_COMMAND: 

wId=LOWORD (wParam) ; 
switch (wid) 

{ 

case  IDOK: 

//when  OK  button  is  pressed  write  question  info  to 
//current  internal  statistic  structure 

check  = IsDlgButtonChecked (hDlg,  ID_QlYes) ; 
if  (check) 

current . resolved  = 1;  //record  yes  to  question  1 (resolved) 
else 

current . resolved  =0;  //record  no  to  question  1 (unresolved) 
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check  = IsDlgButtonChecked (hDlg,  ID_Q2No) ; 
if  (check) 

current . interrupted  = 0;  //record  no  to  question  2 (not  interrupted) 
else 

current . interrupted  = 1;  //record  yes  to  question  2 (interrupted) 
f ill_current ( ) ; //calculate  net  times 

f ill_aggregate ( ) ; //calculate  averages,  percentages,  and  totals 

write_aggregate (hDlg, message, wParam, IParam) ; //record  statistics  in  file 
EndDialog (hDlg, IDOK) ; 
break; 

case  IDCANCEL: 

if  ( !BLD_questDlgDefault (hDlg, message, wParam, IParam) ) 

EndDialog (hDlg, IDCANCEL) ; 
break; 
default : 

return  BLD_questDlgDefault (hDlg, message, wParam,  IParam) ; 
break; 

} 

break; 
default : 

return  BLD_questDlgDef ault (hDlg, message, wParam, IParam) ; 
break; 

} 

return  TRUE;// 

} 


Did  process  the  message 
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//whatuser . c 

//created  12/15/93  by  Laura  L.  Downey,  Comp.  Scientist,  NIST 
//reads  usernum.fil  and  displays  the  user  number  on  the  console 
//created  using  MS  C 6.0  pwb 

//NOTE:  whatuser.exe  must  be  located  in  the  same  directory  as  usernum.fil 


tinclude  <stdio.h> 

main ( ) 

{ 

char  UFILE[]  = "usernum.fil"; 

int  num; 
int  user; 

FILE  *uf; 


//standard  i/o 

//file  containing  user  number 

//was  anything  read  from  the  file 
//user  niomber  read  from  file 

//file  ptr  to  usernum.fil 


uf  = fopen(UFILE,  "rt") ; 
if  (uf  ==  NULL) 

{ 

print f ("UNABLE  TO  OPEN  %s\n,  PROGRAM  EXITING",  UFILE) ; 
exit ( 0 ) ; 

} 

else  //uf  !=  NULL 

{ 

num  = f scanf  (uf , "%d",  &user) ; ' 
if  (num  ==  0) 

{ 

printf ("USERNUM.FIL  WAS  EMPTY,  PROGRAM  EXITING"); 
fclose (uf ) ; 
exit ( 0 ) ; 

} 

else 

{ 

system ("els") ; 

printf ("\n\nUSER  NUMBER  = %d\n\n",  user) ; 
fclose (uf ) ; 

} 

} //end  of  uf  !=  NULL 
} //END  OF  MAIN 
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/*  Kead  In  a record,  If  It  exists.  If  It  exists,  print  “ / 

/*  the  record.  */ 
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prec  “ &rec;  /*  Read  In  a record,  if  it  exists.  If  It  exists,  print 

/*  the  record, 
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FILE  *qflle,  *nflle;  /*  file  pointers  - query/name  file  */  exit(l); 

CLIENT  *clnt;  /*  client  handle  pointer  */  1 

struct  tlmeval  timeout;  /*  timeout  data  structure  */ 
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pr 1 nt f ( "ERROR : Cannot  open  file  %s\n",  qfllenamo);  print f ("Enter  the  offset: 

exlt(l);  gets (user  query. of fset ) ; 
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E Scout  Comments  from  EAMATE  Testing  Session 


This  appendix  contains  scouts'  comments  obtained  during  the  third  testing  session  conducted  by 
NIST  during  January  1993.  Over  a six  and  a half  day  period  consisting  of  five  sessions  a day, 
approximately  20  scouts  were  trained  to  use  the  EAMATE  prototype  system.  Training  times 
ranged  from  a half  hour  to  an  hour  and  a half,  and  the  average  training  time  was  an  hour.  It  must 
be  noted  that  most  of  the  scouts  had  never  used  a mouse,  and  none  were  familiar  with  Microsoft 
Windows.  The  scouts  were  absolutely  amazed  at  the  response  time  of  the  searches  and  the 
robustness  of  the  search  engine.  After  learning  how  to  maneuver  around  the  system,  the  scouts 
spent  their  time  trying  to  "fool"  the  system  by  entering  incorrect  names  and/or  social  security 
numbers.  The  scouts  performed  at  least  20  searches  per  hour  and  were  able  to  locate  the  required 
data.  The  scouts'  comments  are  included  below.  (NOTE:  Comments  are  paraphrased  unless 
contained  in  quotes.) 


"This  system  will  revolutionize  scouting.  It  will  eliminate  the  human  error  factor  caused  by 
fatigue,  poor  spelling  and  simple  carelessness.  The  system  finds  matches  to  names  and  SSNs 
that  the  scout  would  never  think  of,  and,  it  works  at  a speed  that  could  never  be  achieved  by  a 
human  being. 

"The  whole  time  I was  using  the  system,  I kept  thinking  about  how  easy  it  was.  If  the  person 
was  on  the  report,  you  couldn't  help  but  find  them!  If  the  person  was  not  on  the  report,  you  knew 
immediately;  it  greatly  reduced  the  number  of  records  you  needed  to  look  at  to  make  that 
determination. 

"If  the  optical  disk  EAMATE  could  be  linked  to  the  SER,  BAU  Report  and  DECS,  we  could 
eliminate  so  many  paper  listings.  The  listings  would  ALWAYS  be  up-to-date  and  the  time 
involved  copying,  distributing  and  accessing  the  listings  would  be  saved.  It  would  also  eliminate 
accessing  ERQY  in  open  period  cases  — the  system  takes  you  to  the  report  without  knowing  an 
MRN  or  tells  you  if  there  is  no  report. 

I love  optical  disk  EAMATE! ! ! !" 


"Upon  examining  and  accessing  the  on-line  EAMATE  prototype,  I was  quite  impressed. 

"Every  attempt  has  been  made  to  cover  all  potential  problems/questions  that  may  arise,  as 
well  as  enhancements  which  definitely  make  this  program  user-fiiendly. 

"It  is  my  belief,  that  this  prototype  is  the  most  comprehensive  since  our  sources  started  being 
placed  on-line." 


E-l 


"I  think  the  program  set-up  was  excellent  and  it  was  a challenge  to  work  on  the  PC  for  the 
HAMATE  pilot."  I think  it  is  a good  idea  for  the  HAMATE  data  to  be  placed  on  a PC.  The 
system  was  fast  and  easy  for  me  to  learn.  "I  love  the  mouse.  The  instructors  were  very  good." 


"I  think  the  sessions  were  very  helpful.  I think  that  the  new  HAMATE  optical  disc  [project] 
will  be  a benefit  in  the  work  I do.  It  covers  everything  ...  The  teachers  were  very  helpful.  I 
enjoyed  myself." 


"Working  with  the  HAMATE  system  will  help  save  time  by  not  having  to  wait  in  sometimes 
long  lines  in  order  to  get  the  film.  The  system  really  has  its  advantages.  It  identifies  the 
employer  along  with  the  beginning  of  the  report  and  the  end  of  the  report.  It  also  gives  you  the 
amount  of  employees  in  the  report  and  it  also  can  search  for  an  employee  in  a particular  report 
even  if  the  name  is  spelled  wrong  or  if  the  SSN  is  incorrect.  Having  a system  like  this  is  really  a 
good  asset  and  I would  love  to  have  this  system.  One  important  thing  I found  out  was  that  use  of 
this  system  can  also  cut  out  the  use  of  the  COMET  REL,  the  REL,  and  the  on-line  REL." 


"The  optical  disc  project  is  one  of  the  best  things  that  could  happen  to  the  Claims  Coverage 
Branch."  To  be  able  to  process  cases  using  the  system  instead  of  film  is  great  even  if  only  one 
year's  worth  of  data  is  on  the  system  at  present.  I like  the  different  ways  of  finding  a person,  by 
name  and/or  social  security  number.  "I  like  the  mouse."  I especially  like  the  possibility  of  being 
able  to  work  and  complete  a blanket  case  from  start  to  finish  at  one  sitting  and  at  one  terminal. 
This  feature  would  help  with  the  current  backlog  and  would  be  cost  effective.  "The  technical 
ladies  have  done  a fantastic  job.  Thanks  to  them  both." 


"I  think  the  system  for  the  HAMATE  prototype  is  great.  This  system  will  save  time  in 
searching  for  employer  and  employee  information.  I hope  I am  able  to  use  this  system  before  I 
retire.  I also  think  the  coordinators  did  a great  job  putting  the  information  we  gave  them  [into  the 
system]  and  coming  up  with  this  prototype." 


This  new  HAMATE  prototype  will  be  a good  asset  in  aiding  work  performance.  It  was  very 
easy  to  find  the  information  that  I needed  and  it  will  save  a lot  of  time.  "I  found  that  even  the 
most  difficult  names  were  easy  to  locate." 


"The  HAMATE  optical  disk  [prototype]  is  very  advantageous  because  it: 

a)  eliminates  the  possibility  that  a particular  HAMATE  film  is  unavailable  in  the  film  files. 

b)  saves  time  [because]  it  enables  us  to  get  the  complete  report  by  entering  the  report  year 
and  the  EIN  (on  the  microfilm,  it  is  possible  to  pull  a film  only  to  find  out  that  the 
remainder  of  the  report  is  on  the  next  box  of  microfilm). 

c)  should  lessen  the  amount  of  7010s  being  written  up  by  the  ECT's.  Because  of  the  way  it 
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[the  prototype]  is  programmed,  there  is  a far  less  likelihood  of  the  'EO'  conditions 
previously  made  based  on  the  microfilm  search. 

d)  is  still  possible  to  find  your  W/E  [wage  earner]  even  if  the  incorrect  SSN  or  name  is 
entered. 

e)  allows  the  scout  to  make  an  immediate  printout  of  individual  W/E's  or  the  ER  processing 
information  (total  EEs,  wages,  tax  w/h,  etc)." 


"IVe  always  been  willing  to  change  for  the  best.  E AM  ATE  on  the  computer  will  certainly 
trim  scouting  time  from  my  workload.  I found  the  EAMATE  pilot  training  session  to  be 
interesting  and  informative.  I couldn't  find  anything  missing  from  the  various  screens  that  I 
would  need  during  the  scouting  procedure.  I felt  that  learning  to  use  the  mouse  attachment  came 
easily  enough  to  me.  Personally,  I can't  wait  for  the  implementation  of  EAMATE  on  the 
computer." 


"This  machine  is  just  too  smart!  [EAMATE  online]  will  be  very  effective  in  processing  work. 
You  are  able  to  locate  an  employee  even  if  the  name  has  been  misspelled  or  transposed,  or  [if  an] 
incorrect  SSN  [is]  entered.  Employees  who  enter  information  incorrectly  or  by  mistake  will  not 
have  to  be  concerned  that  they  have  done  something  wrong.  This  system  will  find  the  correct 
employee  for  you." 


The  EAMATE  optical  disk  will  be  an  asset  to  the  scouts  by  allowing  faster  and  more  efficient 
processing  as  compared  to  the  current  scouting  procedure.  "The  method  of  finding  employees  is 
remarkable  and  unique.  The  representatives  from  NIST  were  excellent  in  explaining  and 
demonstrating  the  machine." 


"The  EAMATE  optical  disk  pilot  was  very  interesting.  The  speed  and  clarity  of  the  system 
provided  much  more  information  [compared  to  the  current  system].  For  example,  using  the  SSN 
order  format  provided  extra  data  that  could  have  possibly  been  overlooked  doing  routine 
scouting.  The  risk  of  errors  is  small.  Built-in  safeguards  eliminate  that  problem.  The  system  is 
user-friendly  and  very  efficient." 


"The  EAMATE  optical  disk  pilot  has  proven,  through  testing,  to  be  very  efficient." 

Use  of  the  EAMATE  on-line  should  be  very  time-saving  and  precise.  The  pilot  showed  how 
effective  this  system  will  be  in  locating  wage  earners  within  [a]  limited  time,  which  in  retrospect 
vnW  allow  more  work  to  be  done  in  less  time.  The  EAMATE  system  will  also  enable  you  to  find 
needed  information  even  though  very  little  information  has  been  provided  regarding  the 
information  request. 

It  is  my  opinion  that  implementation  of  EAMATE  on-line,  is  well  worth  it." 
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"I  really  enjoyed  having  the  opportunity  to  participate  in  the  EAMATE  optical  disk  pilot. 

"It  would  be  a very  useful  tool  as  far  as  people  searching  or  scouting  employee  wages,  social 
security  numbers,  or  names.  We  did  a lot  of  changing  names  and  social  security  numbers  and 
most  of  the  time  the  information  would  be  in  the  first  ten  names.  If  incorrect  information  was 
sent  in  by  the  employer,  the  machine  would  find  it  and  give  you  the  correct  information.  The 
instructors  were  very  informative  and  comfortable  with  the  EAMATE  optical  disk.  I hope  this 
[system]  will  be  implemented  before  I retire." 


"The  microfilm  information  on  the  optical  disk  is  put  together  in  an  outstanding  way.  I 
enjoyed  using  the  mouse,  instead  of  the  enter  key. 

"My  being  a part  of  the  training  was  a new  learning  experience  that  would  be  valuable  in 
processing  the  work  in  my  area  [which  is  the  blanket  unit]." 


E-4 


F.  Preliminary  Employer  Report  Statistics 


The  following  sections  contain  some  preliminary  employer  report  statistics  which  were  generated 
during  the  laboratory  experiments  performed  at  NIST  on  the  prototype  system.  These  statistics 
will  be  much  expanded  when  SSA  sets  up  the  expanded  prototype  at  OCRO  in  Baltimore, 
Maryland.  However,  these  preliminary  statistics  may  be  useful  in  determining  the  amount  of 
disk  space,  memory,  and  time  necessary  to  convert  the  employer  reports  for  SSA's  system.  In 
particular,  the  Txt/COM  and  the  Brw/COM  ratio  columns  will  be  very  helpful  in  the  parse 
process  in  order  to  determine  browse  and  detail  locations. 


F.l 

Einstats  File 

EIN 

SEQ 

Num 

Rees 

Word 

Count 

Avg  Txt  COM  Txt/  Brw  Brw/ 

WeSize  Size  COM  Size  COM  BLoc  DLoc 

39-1390489 

AAA 

29 

59 

2.034 

8.64 

15.33 

0.564 

2.83 

0.185 

1 

1 

22-2761297 

AAA 

5266 

10935 

2.077 

1462.03  2522.45  0.580 

514.26 

0.204 

1 

1 

56-1336585 

AAA 

501 

1030 

2.056 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

1 

51-0331454 

AAA 

3973 

8936 

2.249 

1103.09  1901.87  0.580 

387.99 

0.204 

1 

1 

71-0517471 

AAA 

3971 

9246 

2.328 

1102.55  1901.09  0.580 

387.79 

0.204 

1 

1 

35-1152814 

AAA 

505 

1131 

2.240 

140.83 

243.79 

0.578 

49.32 

0.202 

1 

1 

35-1152814 

AAB 

500 

1092 

2.184 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

1 

95-6000827 

AAA 

500 

1033 

2.066 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

1 

22-6001794 

AAA 

500 

1056 

2.112 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

1 

94-0902780 

AAA 

501 

1025 

2.046 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

1 

95-1699855 

AAA 

501 

1023 

2.042 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

1 

04-1666290 

AAA 

501 

1037 

2.070 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

1 

01-0212444 

AAA 

501 

1029 

2.054 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

1 

59-2594590 

AAA 

500 

1023 

2.046 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

1 

59-2594590 

AAB 

94 

188 

2.000 

26.78 

47.28 

0.566 

9.18 

0.194 

1 

1 

91-1484586 

AAA 

250 

533 

2.132 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

1 

62-1091294 

AAA 

500 

1013 

2.026 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

1 

34-4431174 

AAA 

500 

1018 

2.036 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

1 

36-2708624 

AAA 

250 

513 

2.052 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

1 

54-6001718 

AAA 

4009 

7377 

1.840 

1113.12  1919.54  0.580 

391.50 

0.204 

1 

1 

34-0846262 

AAA 

3984 

8143 

2.044 

1106.33  1907.85  0.580 

389.06 

0.204 

1 

1 

13-3591193 

AAA 

3999 

9860 

2.466 

1110.40  1914.99  0.580 

390.53 

0.204 

1 

1 

71-0225020 

AAA 

4010 

8982 

2.240 

1113.39  1919.93  0.580 

391.60 

0.204 

1 

1 

54-0332635 

AAA 

4011 

8137 

2.029 

1113.66  1920.32  0.580 

391.70 

0.204 

1 

1 

13-2721761 

AAA 

4014 

8187 

2.040 

1114.47  1921.49  0.580 

391.99 

0.204 

1 

1 

54-6001128 

AAA 

4026 

10090 

2.506 

1117.98  1927.85  0.580 

393.16 

0.204 

2 

1 

93-0654045 

AAA 

250 

504 

2.016 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

74-1109737 

AAA 

4027 

8102 

2.012 

1118.25  1928.89  0.580 

393.26 

0.204 

2 

1 

25-1581273 

AAA 

1002 

2090 

2.086 

278.73 

481.09 

0.579 

97.85 

0.203 

2 

1 

39-0379990 

AAA 

4025 

8152 

2.025 

1117.71  1927.46  0.580 

393.07 

0.204 

2 

1 

56-0348490 

AAA 

3973 

8692 

2.188 

1103.09  1901.87  0.580 

387.99 

0.204 

2 

1 

59-6000396 

AAA 

4023 

8357 

2.077 

1117.16  1926.68  0.580 

392.87 

0.204 

2 

1 

14-1588290 

AAA 

250 

518 

2.072 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

47-0524851 

AAA 

1003 

2125 

2.119 

279.00 

481.48 

0.579 

97.95 

0.203 

2 

1 

31-0859857 

AAA 

1002 

2203 

2.199 

278.73 

481.09 

0.579 

97.85 

0.203 

2 

1 

25-6000141 

AAA 

1002 

2077 

2.073 

278.73 

481.09 

0.579 

97.85 

0.203 

2 

1 
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86-0410573 

AAA 

250 

505 

2.020 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

21-0635010 

AAA 

1002 

2137 

2.133 

278.73 

481.09 

0.579 

97.85 

0.203 

2 

1 

75-2257592 

AAA 

1002 

2034 

2.030 

278.73 

481.09 

0.579 

97.85 

0.203 

2 

1 

41-0719940 

AAA 

1002 

2044 

2.040 

278.73 

481.09 

0.579 

97.85 

0.203 

2 

1 

14-1682942 

AAA 

2499 

5180 

2.073 

694.03 

1196.61  0.580 

244.04 

0.204 

2 

1 

85-6005550 

AAA 

2500 

5167 

2.067 

694.30 

1197.00  0.580 

244.14 

0.204 

2 

1 

62-0400610 

AAA 

2501 

5075 

2.029 

694.58 

1197.39  0.580 

244.24 

0.204 

2 

1 

94-0472650 

AAA 

2505 

5122 

2.045 

695.91 

1200.64  0.580 

244.63 

0.204 

2 

1 

73-0579283 

AAA 

2494 

5089 

2.040 

692.67 

1194.66  0.580 

243.55 

0.204 

2 

1 

91-0984002 

AAA 

501 

1029 

2.054 

139.75 

242.23 

0.577 

48.93 

0.202 

2 

1 

38-6006063 

AAA 

2499 

5127 

2.052 

694.03 

1196.61  0.580 

244.04 

0.204 

2 

1 

06-1204645 

AAA 

250 

505 

2.020 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

54-6001803 

AAA 

1000 

1093 

1.093 

278.18 

480.31 

0.579 

97.66 

0.203 

2 

1 

15-0543659 

AAA 

2499 

5164 

2.066 

694.03 

1196.61  0.580 

244.04 

0.204 

2 

1 

43-0977042 

AAA 

1001 

2046 

2.044 

278.45 

480.70 

0.579 

97.75 

0.203 

2 

1 

56-0792028 

AAA 

999 

2132 

2.134 

277.91 

479.92 

0.579 

97.56 

0.203 

2 

1 

59-0836811 

AAA 

1001 

2162 

2.160 

278.45 

480.70 

0.579 

97.75 

0.203 

2 

1 

71-0480157 

AAA 

1001 

2135 

2.133 

278.45 

480.70 

0.579 

97.75 

0.203 

2 

1 

36-2930831 

AAA 

501 

1028 

2.052 

139.75 

242.23 

0.577 

48.93 

0.202 

2 

1 

75-0755367 

AAA 

1002 

2015 

2.011 

278.73 

481.09 

0.579 

97.85 

0.203 

2 

1 

11-1001790 

AAA 

1000 

2047 

2.047 

278.18 

480.31 

0.579 

97.66 

0.203 

2 

1 

23-1352620 

AAA 

1000 

2100 

2.100 

278.18 

480.31 

0.579 

97.66 

0.203 

2 

1 

54-1549763 

AAA 

1002 

1834 

1.830 

278.73 

481.09 

0.579 

97.85 

0.203 

1 

2 

74-1659656 

AAA 

4009 

4509 

1.125 

1113.12 

1919.54  0.580 

391.50 

0.204 

1 

2 

38-2113393 

AAA 

2018 

4080 

2.022 

560.73 

967.89 

0.579 

197.07 

0.204 

1 

2 

38-2113393 

AAB 

50 

104 

2.080 

14.59 

26.50 

0.551 

4.88 

0.184 

1 

2 

38-2113393 

AAC 

1453 

2938 

2.022 

403.88 

696.82 

0.580 

141.89 

0.204 

1 

2 

38-2113393 

AAD 

163 

330 

2.025 

45.76 

79.10 

0.579 

15.92 

0.201 

1 

2 

38-2113393 

AAE 

1110 

2259 

2.035 

308.79 

533.69 

0.579 

108.40 

0.203 

1 

2 

38-2113393 

AAF 

482 

988 

2.050 

134.34 

232.49 

0.578 

47.07 

0.202 

1 

2 

38-2113393 

AAG 

92 

185 

2.011 

26.73 

51.17 

0.522 

8.98 

0.176 

1 

2 

38-2113393 

AAH 

2509 

5117 

2.039 

697.49 

1210.12  0.576 

245.02 

0.202 

1 

2 

38-2113393 

AAI 

105 

109 

1.038 

29.77 

52.21 

0.570 

10.25 

0.196 

1 

2 

38-2113393 

AAJ 

693 

1403 

2.025 

192.86 

332.89 

0.579 

67.68 

0.203 

1 

2 

38-2113393 

AAK 

758 

1546 

2.040 

211.00 

364.84 

0.578 

74.02 

0.203 

1 

2 

38-2113393 

AAL 

2827 

2955 

1.045 

785.06 

1353.51  0.580 

276.07 

0.204 

1 

2 

38-2113393 

AAM 

390 

397 

1.018 

108.87 

188.72 

0.577 

38.09 

0.202 

1 

2 

38-2113393 

AAN 

15 

15 

1.000 

4.84 

9.22 

0.525 

1.46 

0.159 

1 

2 

38-2113393 

AAO 

344 

355 

1.032 

96.14 

166.51 

0.577 

33.59 

0.202 

1 

2 

38-2113393 

AAP 

4941 

5058 

1.024 

1371.82  2365.69  0.580 

482.52 

0.204 

1 

2 

38-2113393 

AAQ 

1647 

3322 

2.017 

457.79 

790.21 

0.579 

160.84 

0.204 

1 

2 

38-2113393 

AAR 

26 

52 

2.000 

7.83 

14.16 

0.553 

2.54 

0.179 

1 

2 

38-2113393 

AAS 

3387 

3519 

1.039 

940.55 

1622.24  0.580 

330.76 

0.204 

1 

2 

38-2113393 

AAT 

999 

2008 

2.010 

277.91 

479.92 

0.579 

97.56 

0.203 

1 

2 

38-2113393 

AAU 

677 

1368 

2.021 

188.52 

326.01 

0.578 

66.11 

0.203 

1 

2 

38-2113393 

AAV 

2049 

4135 

2.018 

569.15 

981.26 

0.580 

200.10 

0.204 

1 

2 

38-2113393 

AAW 

44 

92 

2.091 

12.96 

23.51 

0.551 

4.30 

0.183 

1 

2 

58-1516994 

AAA 

2494 

5381 

2.158 

692.67 

1194.66  0.580 

243.55 

0.204 

1 

2 

44-6000524 

AAA 

2488 

5073 

2.039 

691.05 

1191.67  0.580 

242.97 

0.204 

1 

2 

33-0363116 

AAA 

3991 

8102 

2.030 

1108.23  1911.23  0.580 

389.75 

0.204 

1 

2 

95-6042622 

AAA 

1003 

2118 

2.112 

279.00 

481.48 

0.579 

97.95 

0.203 

1 

2 

76-0146568 

AAA 

1003 

2041 

2.035 

279.00 

481.48 

0.579 

97.95 

0.203 

1 

2 

75-2255014 

AAA 

3996 

8232 

2.060 

1109.59  1913.17  0.580 

390.23 

0.204 

1 

2 

33-0363116 

AAB 

3991 

8102 

2.030 

1108.23  1911.23  0.580 

389.75 

0.204 

1 

2 
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13-6400571 

AAA 

19804 

40226 

2.031 

5496.58 

9475.86 

0.580 

1933.98  0.204 

1 

68-0038644 

AAA 

1002 

2101 

2.097 

278.73 

481.09 

0.579 

97.85  0.203 

1 

94-3041767 

AAA 

19921 

22138 

1.111 

5528.84 

9530.67 

0.580 

1945.41  0.204 

1 

87-6000525 

AAA 

20035 

43453 

2.169 

5560.53 

9585.35 

0.580 

1956.54  0.204 

1 

04-2103594 

AAA 

19883 

41860 

2.105 

5518.27 

9512.23 

0.580 

1941.70  0.204 

1 

13-5218870 

AAA 

20132 

20674 

1.027 

5587.60 

9632.76 

0.580 

1966.02  0.204 

1 

52-6000989 

AAA 

20166 

41102 

2.038 

5596.83 

9647.96 

0.580 

1969.34  0.204 

1 

41-0749934 

AAA 

20174 

40613 

2.013 

5599.50 

9655.75 

0.580 

1970.12  0.204 

1 

76-0178498 

AAA 

20235 

44500 

2.199 

5616.06 

9681.46 

0.580 

1976.07  0.204 

1 

13-6295168 

AAA 

20314 

21175 

1.042 

5638.00 

9718.87 

0.580 

1983.79  0.204 

1 

74-2248983 

AAA 

30024 

30563 

1.018 

8332.67 

14364.2 

0.580 

2932.03  0.204 

1 

42-6004813 

AAA 

30186 

62623 

2.075 

8377.64 

14441.9 

0.580 

2947.85  0.204 

1 

63-1032906 

AAA 

2499 

5346 

2.139 

694.03 

1196.61 

0.580 

244.04  0.204 

1 

23-1989084 

AAA 

30331 

32358 

1.067 

8417.75 

14510.6 

0.580 

2962.01  0.204 

1 

13-3354541 

AAA 

30371 

31195 

1.027 

8428.85 

14529.8 

0.580 

2965.92  0.204 

1 

63-0941966 

AAA 

39669 

84415 

2.128 

11009.2 

18977.7 

0.580 

3873.93  0.204 

1 

31-1153510 

AAA 

39895 

40333 

1.011 

11072.0 

19086.2 

0.580 

3896.00  0.204 

1 

41-0901437 

AAA 

41426 

83894 

2.025 

11496.8 

19818.0 

0.580 

4045.51  0.204 

1 

36-1115800 

AAA 

40471 

41879 

1.035 

11231.8 

19361.6 

0.580 

3952.25  0.204 

1 

93-0432081 

AAA 

48327 

99317 

2.055 

13411.8 

23118.6 

0.580 

4719.43  0.204 

1 

36-1282500 

AAA 

49059 

99956 

2.037 

13615.2 

23469.3 

0.580 

4790.92  0.204 

1 

38-6006309 

AAA 

51709 

110246 

2.132 

14422.1 

25120.7 

0.574 

5049.71  0.201 

1 

04-3008884 

AAA 

71570 

144306 

2.016 

19862.0 

34237.2 

0.580 

6989.26  0.204 

1 

86-0096778 

AAA 

500 

1038 

2.076 

139.48 

241.19 

0.578 

48.83  0.202 

1 

13-5318100 

AAA 

76672 

163660 

2.135 

21278.0 

36678.5 

0.580 

7487.50  0.204 

2 

38-1274536 

AAA 

77981 

156611 

2.008 

21641.0 

37303.2 

0.580 

7615.33  0.204 

2 

71-0427007 

AAA 

79861 

83475 

1.045 

22162.8 

38203.0 

0.580 

7798.93  0.204 

2 

59-0248365 

AAA 

4943 

9896 

2.002 

1373.11 

2377.38 

0.578 

482.71  0.203 

2 

61-0144470 

AAA 

4947 

10048 

2.031 

1373.45 

2368.02 

0.580 

483.11  0.204 

2 

61-0144470 

AAB 

121 

271 

2.240 

34.11 

59.10 

0.577 

11.82  0.200 

2 

63-6000997 

AAA 

4952 

10128 

2.045 

1374.81 

2370.62 

0.580 

483.59  0.204 

2 

77-0098061 

AAA 

4953 

10167 

2.053 

1375.08 

2371.01 

0.580 

483.69  0.204 

2 

13-3106295 

AAA 

4974 

5142 

1.034 

1381.03 

2381.53 

0.580 

485.74  0.204 

2 

61-1028725 

AAA 

4981 

10070 

2.022 

1382.93 

2384.91 

0.580 

486.43  0.204 

2 

36-1717960 

AAA 

5065 

10374 

2.048 

1406.23 

2424.91 

0.580 

494.63  0.204 

2 

87-0453008 

AAA 

2494 

5097 

2.044 

692.67 

1194.66 

0.580 

243.55  0.204 

2 

74-0484030 

AAA 

10137 

13573 

1.339 

2813.83 

4851.51 

0.580 

989.94  0.204 

2 

04-1734655 

AAA 

10117 

20848 

2.061 

2808.16 

4841.38 

0.580 

987.99  0.204 

2 

63-6001138 

AAA 

10114 

20703 

2.047 

2807.34 

4839.56 

0.580 

987.70  0.204 

2 

41-1260605 

AAA 

10046 

21404 

2.131 

2788.63 

4808.13 

0.580 

981.05  0.204 

2 

86-0414274 

AAA 

10017 

20269 

2.023 

2780.51 

4793.84 

0.580 

978.22  0.204 

2 

63-0857290 

AAA 

10035 

19743 

1.967 

2785.40 

4802.16 

0.580 

979.98  0.204 

2 

98-0018947 

AAA 

9979 

21411 

2.146 

2769.95 

4775.40 

0.580 

974.51  0.204 

2 

38-1709248 

AAA 

9949 

20116 

2.022 

2761.56 

4760.72 

0.580 

971.58  0.204 

2 

74-1586031 

AAA 

5067 

10623 

2.097 

1406.77 

2425.69 

0.580 

494.82  0.204 

2 

62-0450611 

AAA 

5067 

10932 

2.157 

1406.77 

2425.69 

0.580 

494.82  0.204 

2 

75-1232789 

AAA 

123565 

251496 

2.035 

34291.1 

59122.5 

0.580 

12066.8  0.204 

1 

94-1461843 

AAA 

2509 

5155 

2.055 

696.99 

1202.20 

0.580 

245.02  0.204 

1 

39-0967678 

AAA 

5018 

10092 

2.011 

1393.22 

2402.31 

0.580 

490.04  0.204 

1 

23-0671120 

AAA 

5034 

10208 

2.028 

1397.56 

2409.85 

0.580 

491.60  0.204 

1 

15-0398550 

AAA 

5060 

10558 

2.087 

1404.87 

2422.31 

0.580 

494.14  0.204 

1 

36-2179782 

AAA 

5050 

10140 

2.008 

1402.15 

2417.77 

0.580 

493.16  0.204 

1 

05-0447226 

AAA 

5048 

10335 

2.047 

1401.61 

2416.99 

0.580 

492.97  0.204 

1 

76-0264097 

AAA 

5049 

10337 

2.047 

1401.88 

2417.38 

0.580 

493.07  0.204 

1 
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2 

2 

2 
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2 
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2 
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2 

2 

2 

2 

2 

2 
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2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

1 

1 

1 

1 

1 

1 

1 

1 


74-1109741 

AAA 

5012 

10347 

2.064 

1391.59  2399.97  0.580 

489.45 

0.204 

1 

23-1943113 

AAA 

5010 

10243 

2.045 

1391.05  2398.55  0.580 

489.26 

0.204 

1 

38-2072341 

AAA 

1001 

2020 

2.018 

278.45 

480.70 

0.579 

97.75 

0.203 

1 

13-1675535 

AAA 

500 

1020 

2.040 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

31-0559589 

AAA 

5051 

10223 

2.024 

1402.43  2418.16  0.580 

493.26 

0.204 

1 

57-0736794 

AAA 

499 

1019 

2.042 

139.20 

240.80 

0.578 

48.73 

0.202 

1 

23-1979193 

AAA 

501 

1047 

2.090 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

53-0204616 

AAA 

1003 

1048 

1.045 

279.00 

481.48 

0.579 

97.95 

0.203 

1 

61-1078924 

AAA 

499 

1052 

2.108 

139.20 

240.80 

0.578 

48.73 

0.202 

1 

31-1045381 

AAA 

500 

1120 

2.240 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

38-6029206 

AAA 

4990 

9972 

1.998 

1385.37  2388.42  0.580 

487.30 

0.204 

2 

59-1672120 

AAA 

2509 

5134 

2.046 

696.99 

1202.20  0.580 

245.02 

0.204 

2 

56-1381211 

AAA 

2499 

5266 

2.107 

694.03 

1196.61  0.580 

244.04 

0.204 

2 

63-0479282 

AAA 

3996 

8111 

2.030 

1109.59  1913.17  0.580 

390.23 

0.204 

2 

59-1698006 

AAA 

1245 

2545 

2.044 

346.18 

597.59 

0.579 

121.58 

0.203 

2 

59-1698006 

AAB 

8 

17 

2.125 

2.94 

5.84 

0.503 

0.78 

0.134 

2 

59-1698006 

AAC 

371 

766 

2.065 

103.71 

180.02 

0.576 

36.23 

0.201 

2 

59-1698006 

AAD 

1650 

3370 

2.042 

458.60 

791.77 

0.579 

161.13 

0.204 

2 

59-1698006 

AAE 

501 

1226 

2.447 

139.75 

242.23 

0.577 

48.93 

0.202 

2 

59-1698006 

AAF 

4426 

9119 

2.060 

1228.79  2118.39  0.580 

432.23 

0.204 

2 

22-1801227 

AAA 

1000 

2045 

2.045 

278.18 

480.31 

0.579 

97.66 

0.203 

2 

62-1178938 

AAA 

998 

2296 

2.301 

277.64 

479.53 

0.579 

97.46 

0.203 

2 

25-1211482 

AAA 

1001 

2047 

2.045 

278.45 

480.70 

0.579 

97.75 

0.203 

2 

54-6001471 

AAA 

500 

1204 

2.408 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

56-0940643 

AAA 

1475 

3035 

2.058 

409.86 

706.69 

0.580 

144.04 

0.204 

2 

56-0940643 

AAB 

2505 

5077 

2.027 

695.91 

1200.64  0.580 

244.63 

0.204 

2 

58-0978843 

AAA 

500 

1063 

2.126 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

23-1691403 

AAA 

500 

1020 

2.040 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

23-1668435 

AAA 

500 

1032 

2.064 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

34-4428218 

AAA 

997 

2027 

2.033 

277.37 

479.14 

0.579 

97.36 

0.203 

2 

35-1797634 

AAA 

500 

1016 

2.032 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

11-2834450 

AAA 

250 

532 

2.128 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

13-3173586 

AAA 

500 

1041 

2.082 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

94-2290265 

AAA 

250 

541 

2.164 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

58-6000865 

AAA 

250 

589 

2.356 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

74-2404626 

AAA 

999 

2094 

2.096 

277.91 

479.92 

0.579 

97.56 

0.203 

2 

23-2578152 

AAA 

999 

1041 

1.042 

277.91 

479.92 

0.579 

97.56 

0.203 

2 

61-0592866 

AAA 

250 

579 

2.316 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

22-2341770 

AAA 

1001 

2176 

2.174 

278.45 

480.70 

0.579 

97.75 

0.203 

2 

52-0886787 

AAA 

4020 

8403 

2.090 

1116.35  1925.51  0.580 

392.58 

0.204 

2 

95-3946299 

AAA 

133 

282 

2.120 

37.62 

66.11 

0.569 

12.99 

0.196 

2 

95-3946299 

AAB 

250 

527 

2.108 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

95-0613650 

AAA 

4989 

10095 

2.023 

1385.10  2388.03  0.580 

487.21 

0.204 

2 

95-0613650 

AAB 

14328 

29080 

2.030 

3976.82  6855.47  0.580 

1399.22  0.204 

2 

88-0173471 

AAA 

250 

505 

2.020 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

34-1580269 

AAA 

9968 

10555 

1.059 

2766.96  4770.47  0.580 

973.44 

0.204 

2 

34-1580269 

AAB 

5069 

5361 

1.058 

1407.31  2426.47  0.580 

495.02 

0.204 

2 

22-1211670 

AAA 

7902 

16323 

2.066 

2193.48  3781.28  0.580 

771.68 

0.204 

1 

22-1211670 

AAB 

6144 

12482 

2.032 

1705.58  2940.55  0.580 

600.00 

0.204 

1 

22-1211670 

AAC 

3582 

7281 

2.033 

994.72 

1715.49  0.580 

349.80 

0.204 

1 

22-1211670 

AAD 

101 

205 

2.030 

28.68 

50.00 

0.574 

9.86 

0.197 

1 

22-1211670 

AAE 

9309 

18813 

2.021 

2584.10  4455.50  0.580 

909.08 

0.204 

1 

22-1211670 

AAF 

1336 

2756 

2.063 

371.38 

640.97 

0.579 

130.47 

0.204 

1 

22-1211670 

AAG 

107 

218 

2.037 

30.31 

52.99 

0.572 

10.45 

0.197 

1 
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2 
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2 


22-1211670 

AAH 

4990 

10059 

2.016 

1385.37  2388.42  0.580 

487.30 

0.204 

1 

52-6002033 

AAA 

123843 

252037 

2.035 

34368.3  59242.1  0.580 

12094.0  0.204 

1 

34-9990000 

AAA 

250001 

716875 

2.867 

69378.5  119589 

0.580 

24414.1 

0.204 

1 

94-1648752 

AAA 

319 

648 

2.031 

89.10 

154.43 

0.577 

31.15 

0.202 

1 

94-1648752 

AAB 

236 

487 

2.064 

66.07 

114.82 

0.575 

23.05 

0.201 

1 

94-1648752 

AAC 

454 

963 

2.121 

126.74 

219.63 

0.577 

44.34 

0.202 

1 

94-1648752 

AAD 

258 

544 

2.109 

72.29 

125.73 

0.575 

25.20 

0.200 

1 

94-1648752 

AAE 

2332 

5693 

2.441 

647.71 

1116.99  0.580 

227.73 

0.204 

1 

94-1648752 

AAF 

1000 

2077 

2.077 

278.18 

480.31 

0.579 

97.66 

0.203 

1 

94-1648752 

AAG 

383 

794 

2.073 

106.97 

185.34 

0.577 

37.40 

0.202 

1 

94-1648752 

AAH 

250 

533 

2.132 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

94-1648752 

AAI 

1371 

2868 

2.092 

381.13 

657.60 

0.580 

133.89 

0.204 

1 

61-1158928 

AAA 

250 

503 

2.012 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

59-1698006 

AAG 

1245 

2545 

2.044 

346.18 

597.59 

0.579 

121.58 

0.203 

2 

59-1698006 

AAH 

8 

17 

2.125 

2.94 

5.84 

0.503 

0.78 

0.134 

2 

59-1698006 

AAI 

371 

766 

2.065 

103.71 

180.02 

0.576 

36.23 

0.201 

2 

59-1698006 

AAJ 

1650 

3370 

2.042 

458.60 

791.77 

0.579 

161.13 

0.204 

2 

14-1513238 

AAA 

5009 

10176 

2.032 

1390.78  2398.16  0.580 

489.16 

0.204 

1 

13-2526632 

AAA 

2510 

5091 

2.028 

697.27 

1203.23  0.579 

245.12 

0.204 

1 

58-0964286 

AAA 

3995 

4283 

1.072 

1109.31  1912.78  0.580 

390.14 

0.204 

1 

31-1112315 

AAA 

250 

290 

1.160 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

43-1236588 

AAA 

250 

510 

2.040 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

72-0992142 

AAA 

500 

1017 

2.034 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

94-2629822 

AAA 

271324 

550280 

2.028 

75336.8  130392 

0.578 

26496.4  0.203 

1 

87-6000525 

AAB 

20035 

43453 

2.169 

5560.53  9585.35  0.580 

1956.54  0.204 

1 

31-6000142 

AAA 

1002 

2044 

2.040 

278.73 

481.09 

0.579 

97.85 

0.203 

1 

11-2831424 

AAA 

998 

2054 

2.058 

277.64 

479.53 

0.579 

97.46 

0.203 

1 

38-1798424 

AAA 

49664 

101131 

2.036 

13782.9  23758.9  0.580 

4850.00  0.204 

1 

38-1510762 

AAA 

375000 

385412 

1.028 

104067 

179383 

0.580 

36621.1  0.204 

1 

22-1446668 

AAA 

19 

43 

2.263 

5.93 

10.78 

0.550 

1.86 

0.172 

1 

22-1446668 

AAB 

250 

540 

2.160 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

74-2355451 

AAA 

250 

536 

2.144 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

94-2131571 

AAA 

250 

531 

2.124 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

63-0570350 

AAA 

250 

504 

2.016 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

38-0281180 

AAA 

250 

517 

2.068 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

05-0394406 

AAA 

250 

518 

2.072 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

91-1043642 

AAA 

2500 

5009 

2.004 

694.30 

1197.00  0.580 

244.14 

0.204 

1 

74-1750451 

AAA 

5017 

9408 

1.875 

1392.95  2401.92  0.580 

489.94 

0.204 

2 

59-2239528 

AAA 

5018 

11525 

2.297 

1393.22  2402.31  0.580 

490.04 

0.204 

2 

65-0079270 

AAA 

500 

1031 

2.062 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

41-0848441 

AAA 

165398 

335151 

2.026 

45900.4  79120.3  0.580 

16152.1  0.204 

2 

71-0333344 

AAA 

250 

583 

2.332 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

41-1317059 

AAA 

2502 

5075 

2.028 

695.09 

1199.47  0.580 

244.34 

0.204 

2 

16-0743084 

AAA 

500 

1027 

2.054 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

36-3515372 

AAA 

500 

1009 

2.018 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

59-2964349 

AAA 

250 

554 

2.216 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

84-9980000 

AAA 

205891 

431898 

2.098 

57137.5  98489.1  0.580 

20106.5  0.204 

1 

84-9990000 

AAA 

344999 

729059 

2.113 

95741.4  165031 

0.580 

33691.3  0.204 

1 

71-0415188 

AAA 

267590 

271196 

1.013 

74259.6  128003 

0.580 

26131.8  0.204 

1 

53-9990000 

AAA 

281634 

315619 

1.121 

78157.1  134721 

0.580 

27503.3  0.204 

1 

35-9990000 

AAA 

344999 

774468 

2.245 

95741.4  165031 

0.580 

33691.3  0.204 

2 

35-9990000 

AAB 

197983 

441760 

2.231 

54942.9  94706.5  0.580 

19334.2  0.204 

2 

35-9990000 

AAC 

115192 

267757 

2.324 

31967.6  55103.9  0.580 

11249.2  0.204 

2 

76-0300290 

AAA 

501 

1073 

2.142 

139.75 

242.23 

0.577 

48.93 

0.202 

2 
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59-2612918 

AAA 

500 

1022 

2.044 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

1 

38-1369604 

AAA 

1004 

2036 

2.028 

279.52 

484.20 

0.577 

98.05 

0.202 

2 

1 

63-0967763 

AAA 

250 

555 

2.220 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

58-1837116 

AAA 

250 

550 

2.200 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

56-1703216 

AAA 

250 

506 

2.024 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

37-1174785 

AAA 

250 

515 

2.060 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

56-1349827 

AAA 

129 

260 

2.016 

36.53 

63.90 

0.572 

12.60 

0.197 

2 

1 

56-1349827 

AAB 

176 

353 

2.006 

49.54 

86.50 

0.573 

17.19 

0.199 

2 

1 

56-1349827 

AAC 

250 

520 

2.080 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

95-2013660 

AAA 

250 

519 

2.076 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

82-0325203 

AAA 

250 

549 

2.196 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

36-2590063 

AAA 

250 

530 

2.120 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

36-2590063 

AAB 

455 

993 

2.182 

127.01 

220.02 

0.577 

44.43 

0.202 

2 

1 

36-2590063 

AAC 

47 

94 

2.000 

13.78 

24.68 

0.558 

4.59 

0.186 

2 

1 

38-0763360 

AAA 

250 

515 

2.060 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

53-0196597 

AAA 

500 

1068 

2.136 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

1 

74-2545137 

AAA 

250 

527 

2.108 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

59-0751858 

AAA 

250 

527 

2.108 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

94-2507766 

AAA 

250 

542 

2.168 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

04-2156078 

AAA 

250 

530 

2.120 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

72-0741707 

AAA 

250 

522 

2.088 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

33-0195457 

AAA 

250 

514 

2.056 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

95-0831590 

AAA 

250 

513 

2.052 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

84-0602726 

AAA 

250 

566 

2.264 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

39-1143171 

AAA 

250 

511 

2.044 

70.12 

121.96 

0.575 

24.41 

0.200 

2 

1 

61-0997092 

AAA 

998 

1993 

1.997 

277.64 

479.53 

0.579 

97.46 

0.203 

2 

1 

36-3429602 

AAA 

500 

1022 

2.044 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

1 

41-6034144 

AAA 

500 

1076 

2.152 

139.48 

241.19 

0.578 

48.83 

0.202 

2 

1 

03-6000658 

AAA 

501 

1038 

2.072 

139.75 

242.23 

0.577 

48.93 

0.202 

2 

1 

87-0368169 

AAA 

501 

1034 

2.064 

139.75 

242.23 

0.577 

48.93 

0.202 

2 

1 

38-2500514 

AAA 

996 

2048 

2.056 

277.10 

478.75 

0.579 

97.27 

0.203 

2 

1 

65-0012091 

AAA 

996 

2082 

2.090 

277.10 

478.75 

0.579 

97.27 

0.203 

2 

1 

54-6001605 

AAA 

997 

2072 

2.078 

277.37 

479.14 

0.579 

97.36 

0.203 

1 

1 

84-6010331 

AAA 

998 

2023 

2.027 

277.64 

479.53 

0.579 

97.46 

0.203 

1 

1 

76-0276305 

AAA 

501 

1167 

2.329 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

1 

55-0548701 

AAA 

501 

1112 

2.220 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

1 

91-0907451 

AAA 

250 

531 

2.124 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

1 

16-1251902 

AAA 

501 

1017 

2.030 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

1 

57-0874699 

AAA 

501 

1020 

2.036 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

1 

34-0640780 

AAA 

501 

1032 

2.060 

139.75 

242.23 

0.577 

48.93 

0.202 

1 

1 

59-1698006 

AAK 

501 

1049 

2.094 

139.75 

242.23 

0.577 

48.93 

0.202 

2 

1 

59-1698006 

AAL 

204 

419 

2.054 

57.14 

98.71 

0.579 

19.92 

0.202 

2 

1 

59-1698006 

AAM 

512 

1054 

2.059 

142.73 

247.17 

0.577 

50.00 

0.202 

2 

1 

59-1698006 

AAN 

1022 

2117 

2.071 

284.16 

490.18 

0.580 

99.80 

0.204 

2 

1 

59-1698006 

AAO 

260 

535 

2.058 

72.84 

126.51 

0.576 

25.39 

0.201 

2 

1 

76-0100695 

AAA 

500 

1020 

2.040 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

1 

58-6000147 

AAA 

500 

1020 

2.040 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

1 

64-0752022 

AAA 

500 

1055 

2.110 

139.48 

241.19 

0.578 

48.83 

0.202 

1 

1 

94-3070458 

AAA 

250 

526 

2.104 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

1 

38-6004706 

AAA 

250 

518 

2.072 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

1 

04-1689000 

AAA 

250 

513 

2.052 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

1 

84-0997508 

AAA 

250 

501 

2.004 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

1 

95-4172255 

AAA 

250 

536 

2.144 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

1 

52-1661226 

AAA 

250 

542 

2.168 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

1 

F-6 


94-1675108 

AAA 

499 

1099 

2.202 

139.20 

240.80 

0.578 

48.73 

0.202 

1 

1 

93-0765253 

AAA 

499 

1042 

2.088 

139.20 

240.80 

0.578 

48.73 

0.202 

1 

1 

95-3800369 

AAA 

499 

1022 

2.048 

139.20 

240.80 

0.578 

48.73 

0.202 

1 

1 

95-3537532 

AAA 

4028 

8259 

2.050 

1118.52 

1929.28 

0.580 

393.36 

0.204 

1 

2 

34-0505560 

AAA 

4028 

8461 

2.101 

1118.52 

1929.28 

0.580 

393.36 

0.204 

1 

2 

71-6021158 

AAA 

4029 

8099 

2.010 

1118.79 

1929.67 

0.580 

393.46 

0.204 

1 

2 

84-0377058 

AAA 

4029 

8328 

2.067 

1118.79 

1929.67 

0.580 

393.46 

0.204 

1 

2 

13-1562932 

AAA 

250 

516 

2.064 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

2 

35-6000169 

AAA 

997 

2104 

2.110 

277.37 

479.14 

0.579 

97.36 

0.203 

1 

2 

11-2239919 

AAA 

998 

2075 

2.079 

277.64 

479.53 

0.579 

97.46 

0.203 

1 

2 

22-6001820 

AAA 

999 

2065 

2.067 

277.91 

479.92 

0.579 

97.56 

0.203 

1 

2 

63-0581231 

AAA 

230 

485 

2.109 

64.45 

111.83 

0.576 

22.46 

0.201 

1 

2 

63-0581231 

AAB 

999 

2173 

2.175 

277.91 

479.92 

0.579 

97.56 

0.203 

1 

2 

36-2513909 

AAA 

2492 

5156 

2.069 

692.13 

1193.88 

0.580 

243.36 

0.204 

1 

2 

94-1606174 

AAA 

2490 

5099 

2.048 

691.59 

1192.45 

0.580 

243.16 

0.204 

1 

2 

38-2706314 

AAA 

998 

2026 

2.030 

277.64 

479.53 

0.579 

97.46 

0.203 

1 

2 

41-1243894 

AAA 

997 

2023 

2.029 

277.37 

479.14 

0.579 

97.36 

0.203 

1 

2 

44-0545813 

AAA 

997 

2065 

2.071 

277.37 

479.14 

0.579 

97.36 

0.203 

1 

2 

53-0196580 

AAA 

3971 

8841 

2.226 

1102.55 

1901.09 

0.580 

387.79 

0.204 

1 

2 

41-0760000 

AAA 

434578 

466571 

1.074 

120600 

207928 

0.580 

42439 

0.204 

1 

1 

04-2849911 

AAA 

250 

512 

2.048 

70.12 

121.96 

0.575 

24.41 

0.200 

1 

1 

36-3540022 

AAA 

248 

511 

2.060 

69.58 

121.18 

0.574 

24.22 

0.200 

1 

1 

36-3540022 

AAB 

1001 

2014 

2.012 

278.45 

480.70 

0.579 

97.75 

0.203 

1 

1 

36-3540022 

AAC 

85 

171 

2.012 

24.34 

43.12 

0.564 

8.30 

0.192 

1 

1 

62-0721803 

AAA 

3983 

4334 

1.088 

1106.06 

1907.46 

0.580 

388.96 

0.204 

1 

1 

86-6000547 

AAA 

2497 

5126 

2.053 

693.49 

1195.83 

0.580 

243.85 

0.204 

1 

1 

23-1265004 

AAA 

1004 

2025 

2.017 

279.27 

482.51 

0.579 

98.05 

0.203 

1 

1 

13-6400571 

AAB 

19804 

40226 

2.031 

5496.58 

9475.86 

0.580 

1933.98  0.204 

1 

1 

95-1978576 

AAA 

9923 

20184 

2.034 

2754.50 

4749.29 

0.580 

969.04 

0.204 

1 

1 

38-6001599 

AAA 

5058 

12165 

2.405 

1404.33 

2421.54 

0.580 

493.95 

0.204 

1 

1 

73-1032203 

AAA 

2493 

5629 

2.258 

692.40 

1194.27 

0.580 

243.46 

0.204 

1 

1 

F.2  Indexstats  File 


EIN 

Num 

Rees 

CPU 

Time 

Elapsed  Temp 
Time  Space 

Name 

Idx 

Name 

Dup 

SSN 

Idx 

SSN 

Dup 

01-0212444 

501 

1.40 

2 

0.00 

7.87 

45.05 

23.61 

11.74 

04-1666290 

501 

1.33 

1 

0.00 

7.87 

43.34 

23.61 

11.74 

04-1689000 

250 

0.57 

0 

0.00 

7.87 

21.39 

7.87 

5.86 

04-2103594 

19883 

40.15 

44 

1193.16 

7.87 

1719.82 

188.91 

466.01 

04-2849911 

250 

0.60 

1 

0.00 

7.87 

21.26 

7.87 

5.86 

04-3008884 

71570 

113.61 

120 

6234.08 

23.61 

6328.98 

228.26 

1677.42 

05-0394406 

250 

0.57 

1 

0.00 

7.87 

22.01 

7.87 

5.86 

05-0447226 

5048 

13.68 

19 

132.13 

7.87 

451.34 

70.84 

118.31 

11-2239919 

998 

2.95 

3 

0.00 

7.87 

87.25 

39.36 

23.39 

11-2831424 

998 

2.96 

4 

0.00 

7.87 

87.52 

31.48 

23.39 

13-1562932 

250 

0.69 

1 

0.00 

7.87 

22.06 

7.87 

5.86 

13-1675535 

500 

1.54 

2 

0.00 

7.87 

44.20 

23.61 

11.72 

F-7 


13-2526632 

2510 

6.78 

7 

16.02 

7.87 

214.72 

55.10 

58.83 

13-2721761 

4014 

11.87 

13 

68.07 

7.87 

357.27 

86.58 

94.08 

13-3354541 

30371 

45.92 

48 

1097.07 

7.87 

1581.65 

204.65 

711.82 

13-3591193 

3999 

11.02 

12 

92.09 

7.87 

386.69 

78.71 

93.73 

13-5218870 

20132 

35.11 

37 

652.64 

7.87 

1139.92 

181.04 

471.84 

13-6295168 

20314 

33.58 

35 

540.53 

7.87 

1040.09 

165.29 

476.11 

13-6400571 

39608 

63.61 

66 

2842.77 

7.87 

3255.62 

149.55 

928.31 

14-1513238 

5009 

14.14 

17 

96.09 

7.87 

432.97 

94.45 

117.40 

15-0398550 

5060 

13.46 

16 

108.11 

7.87 

448.28 

70.84 

118.59 

16-1251902 

501 

1.27 

2 

0.00 

7.87 

41.38 

23.61 

11.74 

22-1211670 

33471 

64.10 

71 

2346.29 

7.87 

2914.82 

181.04 

784.48 

22-1446668 

269 

0.73 

0 

0.00 

7.87 

23.34 

7.87 

6.30 

22-2761297 

5266 

13.56 

14 

116.11 

7.87 

454.38 

94.45 

123.42 

22-6001794 

500 

1.25 

1 

0.00 

7.87 

44.82 

7.87 

11.72 

22-6001820 

999 

2.85 

3 

0.00 

7.87 

86.24 

39.36 

23.41 

23-0671120 

5034 

12.88 

13 

96.09 

7.87 

429.92 

102.32 

117.98 

23-1265004 

1004 

2.72 

3 

0.00 

7.87 

87.62 

23.61 

23.53 

23-1943113 

5010 

12.76 

14 

92.09 

7.87 

425.77 

94.45 

117.42 

23-1979193 

501 

1.44 

2 

0.00 

7.87 

44.09 

23.61 

11.74 

23-1989084 

30331 

48.62 

52 

1317.29 

7.87 

1772.30 

196.78 

710.88 

31-0559589 

5051 

13.11 

15 

108.11 

7.87 

439.53 

78.71 

118.38 

31-1045381 

500 

1.32 

2 

0.00 

7.87 

43.77 

23.61 

11.72 

31-1112315 

250 

0.44 

1 

0.00 

7.87 

14.64 

7.87 

5.86 

31-1153510 

39895 

56.96 

59 

1749.71 

7.87 

2194.10 

212.52 

935.04 

31-6000142 

1002 

2.56 

2 

0.00 

7.87 

83.82 

23.61 

23.48 

33-0363116 

7982 

15.69 

17 

256.25 

7.87 

687.77 

78.71 

187.08 

34-0505560 

4028 

9.98 

11 

68.07 

7.87 

340.72 

70.84 

94.41 

34-0640780 

501 

1.37 

2 

0.00 

7.87 

43.02 

23.61 

11.74 

34-0846262 

3984 

10.11 

11 

56.05 

7.87 

320.01 

78.71 

93.38 

34-4431174 

500 

1.31 

1 

0.00 

7.87 

43.32 

7.87 

11.72 

34-9990000 

250001 

440.02 

464 

29364.65 

23.61 

27814.53 

94.45 

5859.40 

35-1152814 

1005 

2.80 

3 

0.00 

7.87 

89.61 

23.61 

23.55 

35-6000169 

997 

2.36 

3 

0.00 

7.87 

87.20 

23.61 

23.37 

36-1115800 

40471 

60.29 

64 

1793.75 

7.87 

2285.02 

244.00 

948.54 

36-1282500 

49059 

87.08 

95 

3987.89 

23.61 

4247.56 

196.78 

1149.82 

36-1750680 

470474 

752.20 

888 

46417.29 

23.61 

41123.82 

228.26 

11026.73 

36-2179782 

5050 

13.14 

15 

104.10 

7.87 

439.52 

94.45 

118.36 

36-2513909 

2492 

6.97 

7 

12.01 

7.87 

220.57 

62.97 

58.41 

36-2708624 

250 

0.69 

1 

0.00 

7.87 

21.83 

7.87 

5.86 

36-3540022 

1334 

3.83 

4 

0.00 

7.87 

113.59 

39.36 

31.27 

38-0281180 

250 

0.65 

1 

0.00 

7.87 

22.10 

7.87 

5.86 

38-1510762 

375000 

448.39 

483 

24948.34 

23.61 

21369.76 

236.13 

8789.06 

38-1798424 

49664 

83.92 

104 

3927.83 

7.87 

4346.99 

220.39 

1164.00 

38-2072341 

1001 

2.55 

2 

0.00 

7.87 

85.40 

23.61 

23.46 

38-2113393 

53558 

78.39 

83 

3743.65 

7.87 

3909.66 

188.91 

1255.27 

38-2706314 

998 

2.48 

3 

0.00 

7.87 

82.16 

23.61 

23.39 

38-6001599 

5058 

13.50 

14 

120.12 

7.87 

477.28 

78.71 

118.55 

38-6004706 

250 

0.56 

1 

0.00 

7.87 

20.89 

7.87 

5.86 

38-6006309 

51709 

90.11 

92 

4364.26 

23.61 

4595.02 

196.78 

1211.93 

39-0967678 

5018 

12.69 

13 

104.10 

7.87 

442.39 

102.32 

117.61 

39-1390489 

29 

0.09 

1 

0.00 

7.87 

2.61 

7.87 

0.68 

41-0749934 

20174 

39.67 

41 

1053.03 

7.87 

1607.38 

181.04 

472.83 

41-0760000 

434578 

518.10 

537 

29785.06 

23.61 

25072.81 

236.13 

10185.42 

41-0901437 

41426 

71.92 

82 

3147.07 

7.87 

3628.33 

196.78 

970.92 

F-8 


41-1243894 

997 

3.02 

4 

0.00 

7.87 

84.43 

23.61 

23.37 

42-6004813 

30186 

55.38 

58 

2186.13 

7.87 

2615.60 

220.39 

707.48 

43-1236588 

250 

0.56 

0 

0.00 

7.87 

20.89 

7.87 

5.86 

44-0545813 

997 

2.74 

3 

0.00 

7.87 

87.97 

31.48 

23.37 

44-6000524 

2488 

6.38 

7 

16.02 

7.87 

217.45 

55.10 

58.31 

51-0331454 

3973 

10.30 

11 

100.10 

7.87 

369.93 

70.84 

93.12 

52-1661226 

250 

0.63 

1 

0.00 

7.87 

21.54 

7.87 

5.86 

52-6000989 

20166 

39.91 

40 

1281.25 

7.87 

1769.02 

165.29 

472.64 

52-6002033 

123843 

184.16 

188 

11347.07 

23.61 

10765.24 

196.78 

2902.57 

53-0196580 

3971 

10.35 
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7.87 

20.71 

7.87 

5.86 

91-0984002 

501 

1.71 

2 

0.00 

7.87 

44.59 

23.61 

11.74 

93-0654045 

250 

0.67 

1 

0.00 

7.87 

19.32 

7.87 

5.86 

94-0472650 

2505 

6.97 

8 

12.01 

7.87 

208.16 

62.97 

58.71 

94-2290265 

250 

0.74 

1 

0.00 

7.87 

21.38 

7.87 

5.86 

94-2507766 

250 

0.77 

1 

0.00 

7.87 

21.50 

7.87 

5.86 

95-0613650 

19317 

38.22 

39 

964.94 

7.87 

1503.23 

173.16 

452.74 

95-0831590 

250 

0.75 

1 

0.00 

7.87 

21.27 

7.87 

5.86 

95-2013660 

250 

0.68 

1 

0.00 

7.87 

21.52 

7.87 

5.86 

95-3946299 

383 

1.19 

1 

0.00 

7.87 

32.13 

7.87 

8.98 

98-0018947 

9979 

23.92 

25 

588.57 

7.87 

932.97 

118.07 

233.88 
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